annotate Lib/IMPL/Web/ViewResult.pm @ 243:cd2b1f121029

*TTView: fixed template selection based on the model type
author sergey
date Fri, 19 Oct 2012 02:23:15 +0400
parents f48a1a9f4fa2
children a02b110da931
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
1 package IMPL::Web::ViewResult;
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
2 use strict;
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
3
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
4 use IMPL::Const qw(:prop);
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
5
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
6 use IMPL::declare {
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
7 base => [
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
8 'IMPL::Object' => undef,
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
9 'IMPL::Object::Autofill' => '@_'
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
10 ],
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
11 props => [
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
12 model => PROP_RW
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
13 ]
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
14 };
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
15
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff changeset
16 1;