/[Arh]/lib/Arh/Dispatcher.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /lib/Arh/Dispatcher.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 37 - (show annotations)
Fri Apr 4 11:52:03 2008 UTC (15 years, 11 months ago) by dpavlin
File size: 392 byte(s)
don't show units and pictures to users who are not logged in
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 if ( $user->id ) {
18
19 $top->child( _('Units') => url => '/units' );
20 $top->child( _('Pictures') => url => '/pictures' );
21
22 }
23
24 };
25
26 1;

  ViewVC Help
Powered by ViewVC 1.1.26