/[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

Diff of /lib/A3C/Dispatcher.pm

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

revision 186 by dpavlin, Mon Jun 16 22:56:14 2008 UTC revision 205 by dpavlin, Thu Jun 19 19:05:26 2008 UTC
# Line 36  before '*' => run { Line 36  before '*' => run {
36          my $strix = $top->child( _('Strix') => url => '/strix' );          my $strix = $top->child( _('Strix') => url => '/strix' );
37          $strix->child( _('Name differences') => url => '/strix/name_diff' );          $strix->child( _('Name differences') => url => '/strix/name_diff' );
38          $strix->child( _('SQL') => url => '/strix/sql' );          $strix->child( _('SQL') => url => '/strix/sql' );
39          $strix->child( _('Sitemap') => url => '/strix/sitemap' );          $strix->child( _('Navigation') => url => '/strix/navigation' );
40          $strix->child( _('Layout') => url => '/strix/layout' );          $strix->child( _('Layout') => url => '/strix/layout' );
41    
42  #       $top->child( 'Prefs' => url => '/prefs' ) if Jifty->web->current_user->id;  #       $top->child( 'Prefs' => url => '/prefs' ) if Jifty->web->current_user->id;
43    
44  };  };
45    
 sub first_instance {  
         my $selection = A3C::Model::StrixInstanceSelectionCollection->new;  
         $selection->unlimit;  
         my $instance = $selection->first->instance->instance;  
         warn "# using default instance $instance";  
         return $instance;  
 }  
   
 before '/strix/' => run {  
   
         if ( ! get('instance') ) {  
                 set 'instance' => first_instance;  
         }  
   
 };  
   
46  1;  1;

Legend:
Removed from v.186  
changed lines
  Added in v.205

  ViewVC Help
Powered by ViewVC 1.1.26