1 |
package Arh::Dispatcher; |
2 |
|
3 |
use strict; |
4 |
use warnings; |
5 |
|
6 |
use Jifty::Dispatcher -base; |
7 |
|
8 |
use Data::Dump qw/dump/; |
9 |
|
10 |
before '*' => run { |
11 |
my $top = Jifty->web->navigation; |
12 |
my $user = Jifty->web->current_user; |
13 |
|
14 |
#set user => $user; |
15 |
#warn "##### ",dump( $user ); |
16 |
|
17 |
$top->child( _('Units') => url => '/units' ); |
18 |
|
19 |
if ( $user->id ) { |
20 |
$top->child( _('Pictures') => url => '/pictures' ); |
21 |
} |
22 |
|
23 |
}; |
24 |
|
25 |
on qr{/pictures/show/(.+)$} => run { |
26 |
warn "## showing raw_pic $1\n"; |
27 |
set filename => $1; |
28 |
show 'raw_pic'; |
29 |
}; |
30 |
|
31 |
1; |