Mercurial > pub > Impl
annotate Lib/IMPL/Web/ViewResult.pm @ 245:7c517134c42f
Added Unsupported media type Web exception
corrected resourceLocation setting in the resource
Implemented localizable resources for text messages
fixed TT view scopings, INIT block in controls now sets globals correctly.
| author | sergey |
|---|---|
| date | Mon, 29 Oct 2012 03:15:22 +0400 |
| parents | a02b110da931 |
| children | 32aceba4ee6d |
| 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 => [ |
| 244 | 12 model => PROP_RW, |
| 13 location => PROP_RW | |
|
241
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 |
| 244 | 17 1; |
| 18 | |
| 19 __END__ | |
| 20 | |
| 21 =pod | |
| 22 | |
| 23 =head1 NAME | |
| 24 | |
| 25 C<IMPL::Web::ViewResult> - описание представления результата. | |
| 26 | |
| 27 =head1 SYNOPSIS | |
| 28 | |
| 29 =begin code | |
| 30 | |
| 31 sub HttpGet { | |
| 32 my ($this, $action) = @_; | |
| 33 | |
| 34 return IMPL::Web::ViewResult->new( | |
| 35 model => $model, | |
| 36 location => $this->location | |
| 37 ); | |
| 38 } | |
| 39 | |
| 40 =end code | |
| 41 | |
| 42 =head1 DESCRIPTION | |
| 43 | |
| 44 Сожержит в себе информацию для представления модели. | |
| 45 | |
| 46 =head1 MEMBERS | |
| 47 | |
| 48 =head2 C<[get,set]model> | |
| 49 | |
| 50 Модель ресурса, как правило это результат выполнения C<Http> метода. | |
| 51 | |
| 52 =head2 C<[get,set]location> | |
| 53 | |
| 54 Текущий абсолютный адрес ресурса. | |
| 55 | |
| 56 =cut |