--- trunk/lib/SVNBrowser/Dispatcher.pm 2006/12/05 15:08:46 5 +++ trunk/lib/SVNBrowser/Dispatcher.pm 2006/12/07 10:04:58 22 @@ -8,9 +8,32 @@ use Data::Dump qw/dump/; -on '/' => run { - show '/list'; +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;