Mercurial > pub > Impl

comparison lib/IMPL/Web/ViewResult.pm @ 407:c6e90e02dd17 ref20150831

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
renamed Lib->lib
author cin
date Fri, 04 Sep 2015 19:40:23 +0300
parents
children
comparison
equal deleted inserted replaced
406:f23fcb19d3c1 407:c6e90e02dd17
1 package IMPL::Web::ViewResult;
2 use strict;
3
4 use IMPL::Const qw(:prop);
5 use Carp qw(carp);
6
7 use IMPL::declare {
8 base => [
9 'IMPL::Object' => undef,
10 'IMPL::Object::Autofill' => '@_'
11 ],
12 props => [
13 model => PROP_RW,
14 _location => PROP_RW,
15 cookies => PROP_RW,
16 headers => PROP_RW,
17 status => PROP_RW
18 ]
19 };
20
21 sub location {
22 carp "location property is absolute";
23 return shift->_location(@_);
24 }
25
26 1;
27
28 __END__
29
30 =pod
31
32 =head1 NAME
33
34 C<IMPL::Web::ViewResult> - описание представления результата.
35
36 =head1 SYNOPSIS
37
38 =begin code
39
40 sub HttpGet {
41 my ($this, $action) = @_;
42
43 return IMPL::Web::ViewResult->new(
44 model => $model
45 );
46 }
47
48 =end code
49
50 =head1 DESCRIPTION
51
52 Сожержит в себе информацию для представления модели. Также включает поля для
53 заголовков ответа C<cookies>, C<headers>, C<status>.
54
55 =head1 MEMBERS
56
57 =head2 C<[get,set]model>
58
59 Модель ресурса, как правило это результат выполнения C<Http> метода.
60
61 =head2 C<[get,set]cookies>
62
63 Хеш с печеньками, которые будут добавлены в C<HTTP> ответ.
64
65 =head2 C<[get,set]headers>
66
67 Заголовки которые нужно добавить в заголовки C<HTTP> ответа.
68
69 =head2 C<[get,set]status>
70
71 Код C<HTTP> ответа.
72
73 =cut