lib/SVNBrowser/View.pm

package SVNBrowser::View;

# Dobrica Pavlinusic, <dpavlin@rot13.org> 09/03/07 22:14:24 CEST

use strict;
use warnings;

use Jifty::View::Declare -base;

use Data::Dump qw/dump/;

template '/x' => page {
        h1 { _("SVN Repository browser") },

        form {

                my $filter = Jifty->web->new_action(
                        class => 'Filter',
                        moniker => 'filter_list',
                );
                render_param( $filter => 'author' );
                render_param( $filter => 'branch' );
                render_param( $filter => 'rel_path' );
                render_param( $filter => 'search' );

                div { attr { class => 'inline' }

                render_param( $filter => 'from_date' );
                render_param( $filter => 'to_date' );
                render_param( $filter => 'per_page' );
                render_param( $filter => 'show_actions' );

                }

                form_submit( label => _("Filter commits") );

        }

}
1	dpavlin	64	package SVNBrowser::View;
2
3			# Dobrica Pavlinusic, <dpavlin@rot13.org> 09/03/07 22:14:24 CEST
4
5			use strict;
6			use warnings;
7
8			use Jifty::View::Declare -base;
9
10			use Data::Dump qw/dump/;
11
12			template '/x' => page {
13			h1 { _("SVN Repository browser") },
14
15			form {
16
17			my $filter = Jifty->web->new_action(
18			class => 'Filter',
19			moniker => 'filter_list',
20			);
21			render_param( $filter => 'author' );
22			render_param( $filter => 'branch' );
23			render_param( $filter => 'rel_path' );
24			render_param( $filter => 'search' );
25
26			div { attr { class => 'inline' }
27
28			render_param( $filter => 'from_date' );
29			render_param( $filter => 'to_date' );
30			render_param( $filter => 'per_page' );
31			render_param( $filter => 'show_actions' );
32
33			}
34
35			form_submit( label => _("Filter commits") );
36
37			}
38
39			}