Mercurial > pub > Impl

comparison Lib/IMPL/Web/Handler/TTView.pm @ 233:3cebcf6fdb9b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
refactoring, cleaning code
author sergey
date Thu, 11 Oct 2012 04:53:08 +0400
parents 47f77e6409f7
children a4d9126edcbb
comparison
equal deleted inserted replaced
232:5c82eec23bb6 233:3cebcf6fdb9b
1 package IMPL::Web::Handler::TTView; 1 package IMPL::Web::Handler::TTView;
2 use strict; 2 use strict;
3 3
4 use List::Util qw(first); 4 use List::Util qw(first);
5 use IMPL::lang qw(:declare :constants); 5 use IMPL::Const qw(:prop);
6 use IMPL::declare { 6 use IMPL::declare {
7 require => { 7 require => {
8 Factory => 'IMPL::Object::Factory', 8 Factory => 'IMPL::Object::Factory',
9 HttpResponse => 'IMPL::Web::HttpResponse' 9 HttpResponse => 'IMPL::Web::HttpResponse'
10 }, 10 },
13 'IMPL::Object::Autofill' => '@_', 13 'IMPL::Object::Autofill' => '@_',
14 'IMPL::Object::Serializable' => undef 14 'IMPL::Object::Serializable' => undef
15 ], 15 ],
16 16
17 props => [ 17 props => [
18 contentType => PROP_GET | PROP_OWNERSET, 18 contentType => PROP_RO,
19 contentCharset => PROP_GET | PROP_OWNERSET, 19 contentCharset => PROP_RO,
20 loader => PROP_GET | PROP_OWNERSET, 20 loader => PROP_RO,
21 selectors => PROP_GET | PROP_LIST | PROP_OWNERSET, 21 selectors => PROP_RO | PROP_LIST,
22 defaultDocument => PROP_ALL, 22 defaultDocument => PROP_RW,
23 indexResource => PROP_ALL, 23 indexResource => PROP_RW,
24 _selectorsCache => PROP_ALL, 24 _selectorsCache => PROP_RW,
25 _classTemplates => PROP_ALL 25 _classTemplates => PROP_RW
26 ] 26 ]
27 }; 27 };
28 28
29 sub CTOR { 29 sub CTOR {
30 my ($this) = @_; 30 my ($this) = @_;