/[transports]/trunk/lib/Transports/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/Transports/Dispatcher.pm

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

revision 13 by dpavlin, Fri May 5 22:20:53 2006 UTC revision 72 by dpavlin, Mon Jun 12 03:44:50 2006 UTC
# Line 2  package Transports::Dispatcher; Line 2  package Transports::Dispatcher;
2  use Jifty::Dispatcher -base;  use Jifty::Dispatcher -base;
3    
4  # Default page  # Default page
5  on '/', run {  #on '/', run {
6      redirect( '/new_transport');  #    redirect( '/new');
7  };  #};
8    
9  on '/all_transports', run {  =head1 Login and logout operations
         my $transports = Transports::Model::TransportCollection->new();  
     $transports->unlimit();  
10    
11          set transports => $transports;  =head2 login
 };  
12    
13  on '/new_transport', run {  =cut
         my $t = Jifty->web->new_action(  
                 class => 'CreateTransport',  
                 monkier => 'create',  
         );  
14    
15          set transport => $t;  on qr'^/login(/.*)?$', run {
         set viewer => Jifty->web->new_action( class => 'UpdateTransport', record => $t );  
 };  
16    
17            my $return_url = $1 || '/';
18    
   
 # Login  
 on 'login', run {  
19      set 'action' =>      set 'action' =>
20          Jifty->web->new_action( class => 'Login', moniker => 'loginbox' );          Jifty->web->new_action( class => 'Login', moniker => 'loginbox' );
21      set 'next' => Jifty->web->request->continuation      set 'next' => Jifty->web->request->continuation
22          || Jifty::Continuation->new(          || Jifty::Continuation->new(
23          request => Jifty::Request->new( path => "/" ) );          request => Jifty::Request->new( path => $return_url ) );
24            show '/login';
25  };  };
26    
27  # Log out  =head2 logout
28    
29    =cut
30    
31  before 'logout', run {  before 'logout', run {
32      Jifty->web->request->add_action(      Jifty->web->request->add_action(
33          moniker => 'logout',          moniker => 'logout',
# Line 42  before 'logout', run { Line 35  before 'logout', run {
35      );      );
36  };  };
37    
38    
39    # These are dispatcher rules that halos and error handling need to be
40    # able to edit files in place.  These should become a plugin of some
41    # sort, when we have that infrastructure.
42    
43    before qr'^(.*)$', run {
44            my $url = $1 || '/';
45    
46            Jifty->api->allow(qr/^Jifty::Action::Devel/)
47          if Jifty->config->framework('DevelMode');
48    
49            return if ($url eq '/' || $url =~ m#^/login#);
50    
51            if (not Jifty->web->current_user->id) {
52                    redirect( '/login' . $url );
53            }
54    };
55    
56    on qr'^/__jifty/edit/(.*?)/(.*)$', run {
57        my $editor = Jifty->web->new_action(
58            class     => 'Jifty::Action::Devel::FileEditor',
59            moniker   => 'editpage',
60            arguments => {
61                source_path => $2,
62                file_type   => $1,
63            }
64        );
65    
66        set editor => $editor;
67        show '/__jifty/edit_file';
68    };
69    
70  1;  1;
Legend:
Removed from v.13  
changed lines
  Added in v.72
  ViewVC Help
Powered by ViewVC 1.1.26