/[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 48 by dpavlin, Sun Jan 21 12:40:13 2007 UTC revision 49 by dpavlin, Sun Jan 21 13:01:38 2007 UTC
# Line 18  before '*' => run { Line 18  before '*' => run {
18          while ( my $db = $databases->next ) {          while ( my $db = $databases->next ) {
19                  my $label = $db->name;                  my $label = $db->name;
20  #               $label .= ' [' . $db->dsn . ']' if ($edit);  #               $label .= ' [' . $db->dsn . ']' if ($edit);
21                  $l->child( $label => url => '/list/database/' . $db->id );                  my $url = '/list/database/' . $db->id;
22                    my $path = Jifty->web->request->path;
23                    warn "url: $url path: $path\n";
24                    $l->child( $label => url => $url => active => ( $url eq $path ) );
25          }          }
26    
27          if ( Jifty->web->current_user->id ) {          if ( Jifty->web->current_user->id ) {
Legend:
Removed from v.48  
changed lines
  Added in v.49
  ViewVC Help
Powered by ViewVC 1.1.26