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 } |
