Mercurial > pub > Impl

comparison Lib/IMPL/Web/Application.pm @ 357:ec58c47edb52

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
web security: code cleanup, refactoring
author cin
date Fri, 18 Oct 2013 15:10:10 +0400
parents 97628101b765
children
comparison
equal deleted inserted replaced
356:97131d500f16 357:ec58c47edb52
23 ], 23 ],
24 props => [ 24 props => [
25 baseUrl => PROP_RW, 25 baseUrl => PROP_RW,
26 actionFactory => PROP_RW, 26 actionFactory => PROP_RW,
27 handlers => PROP_RW | PROP_LIST, 27 handlers => PROP_RW | PROP_LIST,
28 security => PROP_RW, 28 securityFactory => PROP_RW,
29 output => PROP_RW, 29 output => PROP_RW,
30 location => PROP_RO, 30 location => PROP_RO,
31 _handler => PROP_RW 31 _handler => PROP_RW
32 ] 32 ]
33 }; 33 };
41 41
42 $this->baseUrl('/') unless $this->baseUrl; 42 $this->baseUrl('/') unless $this->baseUrl;
43 43
44 $this->actionFactory(TAction) unless $this->actionFactory; 44 $this->actionFactory(TAction) unless $this->actionFactory;
45 $this->location(Locator->new(base => $this->baseUrl)); 45 $this->location(Locator->new(base => $this->baseUrl));
46 }
47
48 sub CreateSecurity {
49 my $factory = shift->securityFactory;
50 return $factory ? $factory->new() : undef;
46 } 51 }
47 52
48 sub ProcessRequest { 53 sub ProcessRequest {
49 my ($this,$q) = @_; 54 my ($this,$q) = @_;
50 55