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

Diff of /trunk/lib/SQLSession/Dispatcher.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 49 by dpavlin, Sun Jan 21 13:01:38 2007 UTC revision 58 by dpavlin, Thu Jan 25 13:08:06 2007 UTC
# Line 9  use Data::Dump qw/dump/; Line 9  use Data::Dump qw/dump/;
9    
10  before '*' => run {  before '*' => run {
11          my $top = Jifty->web->navigation;          my $top = Jifty->web->navigation;
12          my $edit = Jifty->config->app('edit');          my $edit = Jifty->web->current_user->role('edit');
13          $top->child( 'New' => url => '/new' ) if ($edit);          $top->child( 'New' => url => '/new' ) if ($edit);
14          my $l = $top->child( 'List' => url => '/list' );          my $l = $top->child( 'List' => url => '/list' );
15    
# Line 20  before '*' => run { Line 20  before '*' => run {
20  #               $label .= ' [' . $db->dsn . ']' if ($edit);  #               $label .= ' [' . $db->dsn . ']' if ($edit);
21                  my $url = '/list/database/' . $db->id;                  my $url = '/list/database/' . $db->id;
22                  my $path = Jifty->web->request->path;                  my $path = Jifty->web->request->path;
23                  warn "url: $url path: $path\n";  #               warn "url: $url path: $path\n";
24                  $l->child( $label => url => $url => active => ( $url eq $path ) );                  $l->child( $label => url => $url => active => ( $url eq $path ) );
25          }          }
26    
# Line 31  before '*' => run { Line 31  before '*' => run {
31                  $top->child( 'Signup' => url => '/signup' );                  $top->child( 'Signup' => url => '/signup' );
32          }          }
33    
34            if ( Jifty->web->current_user->role( 'admin' ) ) {
35                    $top->child( 'Docs' => url => '/__jifty/online_docs/' );
36                    $top->child( 'Administration' => url => '/__jifty/admin/' );
37            }
38    
39  };  };
40    
41    
Legend:
Removed from v.49  
changed lines
  Added in v.58
  ViewVC Help
Powered by ViewVC 1.1.26