lib/SVNBrowser/Dispatcher.pm

#
package SVNBrowser::Dispatcher;

use strict;
use warnings;

use Jifty::Dispatcher -base;

use Data::Dump qw/dump/;

under '' => [

        on qr{author/([^/]+)} => run {
                set author => $1;
        },

        on qr{actions} => run {
                set show_actions => 1;
        },

        on qr{page/(\d+)} => run {
                set on_page => $1;
        },

        on qr{from/([^/]+)} => run {
                set from_date => $1;
        },

        on qr{to/([^/]+)} => run {
                set to_date => $1;
        },

        run {
                show '/list';
        },

];

1;
1	dpavlin	5	#
2			package SVNBrowser::Dispatcher;
3
4			use strict;
5			use warnings;
6
7			use Jifty::Dispatcher -base;
8
9			use Data::Dump qw/dump/;
10
11	dpavlin	22	under '' => [
12	dpavlin	5
13	dpavlin	22	on qr{author/([^/]+)} => run {
14			set author => $1;
15			},
16	dpavlin	5
17	dpavlin	22	on qr{actions} => run {
18			set show_actions => 1;
19			},
20
21			on qr{page/(\d+)} => run {
22			set on_page => $1;
23			},
24
25			on qr{from/([^/]+)} => run {
26			set from_date => $1;
27			},
28
29			on qr{to/([^/]+)} => run {
30			set to_date => $1;
31			},
32
33			run {
34			show '/list';
35			},
36
37			];
38
39	dpavlin	5	1;