Mercurial > pub > site.implab
comparison lib/Implab/Web/Resources/Root.pm @ 11:573272ec604b
almost comlete doxygen library
author | sergey |
---|---|
date | Thu, 15 May 2014 18:24:02 +0400 |
parents | aac1085b256d |
children |
comparison
equal
deleted
inserted
replaced
10:83ad674a8cdd | 11:573272ec604b |
---|---|
2 use strict; | 2 use strict; |
3 | 3 |
4 use IMPL::declare { | 4 use IMPL::declare { |
5 require => { | 5 require => { |
6 LibraryResource => '-Benzin::Web::Resources::Doxygen::Library', | 6 LibraryResource => '-Benzin::Web::Resources::Doxygen::Library', |
7 UserResource => '-Benzin::Web::Resources::UserResource' | 7 UserResource => '-Benzin::Web::Resources::UserResource', |
8 Sec => 'IMPL::Security' | |
8 }, | 9 }, |
9 base => [ | 10 base => [ |
10 'IMPL::Web::Application::Resource' => '@_' | 11 'IMPL::Web::Application::Resource' => '@_' |
11 ] | 12 ] |
12 }; | 13 }; |
13 | 14 |
14 sub children { | 15 sub children { |
16 my $this = shift; | |
15 return { | 17 return { |
16 library => { | 18 library => { |
17 class => LibraryResource | 19 class => LibraryResource, |
20 connection => $this->application->connections->{doxLibrary} | |
18 }, | 21 }, |
19 user => { | 22 user => { |
23 model => sub { | |
24 Sec->principal; | |
25 }, | |
26 role => 'user', | |
20 class => UserResource, | 27 class => UserResource, |
21 components => [qw(login logout passwd edit)] | 28 components => [qw(login logout passwd edit)] |
22 } | 29 } |
23 }; | 30 }; |
24 } | 31 } |