/[A3C]/lib/A3C/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

Annotation of /lib/A3C/Dispatcher.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 71 - (hide annotations)
Thu Apr 10 21:33:37 2008 UTC (15 years, 11 months ago) by dpavlin
File size: 678 byte(s)
- change URL scheme
- added some desriptions in h1
- make search action sticky, so that search parametars are left in form after submit
1 dpavlin 50 package A3C::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 dpavlin 67 warn "## ", Jifty->web->request->path;
12     Jifty->web->tangent(url => '/ldaplogin')
13     if ( ! Jifty->web->current_user->id && Jifty->web->request->path !~ m{^/(?:ldaplogin|__jifty)} );
14    
15 dpavlin 50 my $top = Jifty->web->navigation;
16     my $user = Jifty->web->current_user->user_object;
17    
18     # Jifty->log->debug("current_user = ", dump( $user ));
19    
20 dpavlin 71 $top->child( _('People') => url => 'people' );
21    
22     $top->child( _('Sync') => url => 'sync' );
23     $top->child( _('LDAP') => url => 'ldap' );
24    
25 dpavlin 50 # $top->child( 'Prefs' => url => '/prefs' ) if Jifty->web->current_user->id;
26    
27     };
28    
29     1;

  ViewVC Help
Powered by ViewVC 1.1.26