Mercurial > pub > Impl

comparison Lib/IMPL/Web/Handler/View.pm @ 372:e12c14177848

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
refactoring web resources model, implementing new simplified model
author cin
date Tue, 24 Dec 2013 20:01:55 +0400
parents d5c8b955bf8d
children 73f81f4e9570
comparison
equal deleted inserted replaced
371:d5c8b955bf8d 372:e12c14177848
8 use IMPL::declare { 8 use IMPL::declare {
9 require => { 9 require => {
10 Factory => 'IMPL::Web::View::ObjectFactory', 10 Factory => 'IMPL::Web::View::ObjectFactory',
11 HttpResponse => 'IMPL::Web::HttpResponse', 11 HttpResponse => 'IMPL::Web::HttpResponse',
12 Loader => 'IMPL::Code::Loader', 12 Loader => 'IMPL::Code::Loader',
13 ViewResult => '-IMPL::Web::ViewResult', 13 ViewResult => 'IMPL::Web::ViewResult',
14 Security => 'IMPL::Security' 14 Security => 'IMPL::Security'
15 }, 15 },
16 base => [ 16 base => [
17 'IMPL::Object' => undef, 17 'IMPL::Object' => undef,
18 'IMPL::Object::Autofill' => '@_', 18 'IMPL::Object::Autofill' => '@_',
56 location => $action->context->{resourceLocation}, 56 location => $action->context->{resourceLocation},
57 resource => $action->context->{resource}, 57 resource => $action->context->{resource},
58 layout => $this->layout, 58 layout => $this->layout,
59 document => {}, 59 document => {},
60 session => sub { Security->context }, 60 session => sub { Security->context },
61 user => sub { Security->principal } 61 user => sub { Security->principal },
62 security => sub { $action->security }
62 }; 63 };
63 64
64 my %responseParams = ( 65 my %responseParams = (
65 type => $this->contentType, 66 type => $this->contentType,
66 charset => $this->contentCharset, 67 charset => $this->contentCharset,