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

Diff of /lib/Arh/Dispatcher.pm

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

revision 37 by dpavlin, Fri Apr 4 11:52:03 2008 UTC revision 68 by dpavlin, Tue Apr 8 23:36:02 2008 UTC
# Line 14  before '*' => run { Line 14  before '*' => run {
14          #set user => $user;          #set user => $user;
15          #warn "##### ",dump( $user );          #warn "##### ",dump( $user );
16    
17          if ( $user->id ) {          $top->child( _('Units') => url => '/units' );
18            $top->child( _('Bulk create') => url => '/units/bulk' );
19    
20                  $top->child( _('Units') => url => '/units' );          if ( $user->id ) {
21                  $top->child( _('Pictures') => url => '/pictures' );                  # only for logged users
           
22          }          }
23    
24  };  };
25    
26    on qr{^/pictures/show/(.+)$} => run {
27            warn "## showing raw_pic $1\n";
28            set filename => $1;
29            show 'raw_pic';
30    };
31    
32    under qr{^/units/bulk} => run {
33            set per_page => 1;
34            my $u = Arh::Model::UnitCollection->new;
35            $u->unlimit;
36            set page => $u->count unless get('page');
37    };
38    
39  1;  1;
Legend:
Removed from v.37  
changed lines
  Added in v.68
  ViewVC Help
Powered by ViewVC 1.1.26