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

Annotation of /trunk/lib/Transports/Dispatcher.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 25 - (hide annotations)
Fri May 26 19:15:32 2006 UTC (17 years, 11 months ago) by dpavlin
File size: 1565 byte(s)
refactor methods (much shorter), make default page with a Pony, automaticly fill user which
generated transport, added missing nav and sidebar
1 dpavlin 5 package Transports::Dispatcher;
2     use Jifty::Dispatcher -base;
3    
4     # Default page
5 dpavlin 25 #on '/', run {
6     # redirect( '/new');
7     #};
8 dpavlin 5
9 dpavlin 25 on '/transports', run {
10 dpavlin 12 my $transports = Transports::Model::TransportCollection->new();
11     $transports->unlimit();
12    
13     set transports => $transports;
14     };
15    
16 dpavlin 25 on '/new', run {
17 dpavlin 13 my $t = Jifty->web->new_action(
18     class => 'CreateTransport',
19     monkier => 'create',
20     );
21 dpavlin 12
22 dpavlin 13 set transport => $t;
23     set viewer => Jifty->web->new_action( class => 'UpdateTransport', record => $t );
24     };
25    
26    
27    
28 dpavlin 5 # Login
29     on 'login', run {
30     set 'action' =>
31     Jifty->web->new_action( class => 'Login', moniker => 'loginbox' );
32     set 'next' => Jifty->web->request->continuation
33     || Jifty::Continuation->new(
34     request => Jifty::Request->new( path => "/" ) );
35     };
36    
37     # Log out
38     before 'logout', run {
39     Jifty->web->request->add_action(
40     moniker => 'logout',
41     class => 'Transports::Action::Logout'
42     );
43     };
44    
45 dpavlin 14
46     # These are dispatcher rules that halos and error handling need to be
47     # able to edit files in place. These should become a plugin of some
48     # sort, when we have that infrastructure.
49    
50     before '*', run {
51     Jifty->api->allow(qr/^Jifty::Action::Devel/)
52     if Jifty->config->framework('DevelMode');
53     };
54    
55     on qr'^/__jifty/edit/(.*?)/(.*)$', run {
56     my $editor = Jifty->web->new_action(
57     class => 'Jifty::Action::Devel::FileEditor',
58     moniker => 'editpage',
59     arguments => {
60     source_path => $2,
61     file_type => $1,
62     }
63     );
64    
65     set editor => $editor;
66     show '/__jifty/edit_file';
67     };
68    
69 dpavlin 5 1;

  ViewVC Help
Powered by ViewVC 1.1.26