1 |
<%args> |
<%args> |
2 |
$next |
$next => undef |
3 |
</%args> |
</%args> |
4 |
|
|
5 |
<%init> |
<%init> |
8 |
moniker => 'filter_list', |
moniker => 'filter_list', |
9 |
arguments => { %ARGS }, |
arguments => { %ARGS }, |
10 |
); |
); |
11 |
|
|
12 |
|
#use Data::Dump qw/dump/; |
13 |
|
#warn "ARGS = ", dump( %ARGS ); |
14 |
</%init> |
</%init> |
15 |
|
|
16 |
<&| /_elements/wrapper, title => "SVN Reporitory Browser" &> |
<&| /_elements/wrapper, title => "SVN Reporitory Browser" &> |
19 |
|
|
20 |
<% $filter->form_field('author') %> |
<% $filter->form_field('author') %> |
21 |
<% $filter->form_field('branch') %> |
<% $filter->form_field('branch') %> |
22 |
|
<% $filter->form_field('rel_path') %> |
23 |
<% $filter->form_field('search') %> |
<% $filter->form_field('search') %> |
24 |
|
|
25 |
<div class="inline"> |
<div class="inline"> |
37 |
|
|
38 |
<dl> |
<dl> |
39 |
% while (my $r = $revisions->next) { |
% while (my $r = $revisions->next) { |
40 |
<& /actions, revision => $r->revision, next => $next, show_actions => $filter->argument_value('show_actions'), r => $r &> |
<& /actions, |
41 |
|
revision => $r->revision, |
42 |
|
rel_path => $filter->argument_value('rel_path'), |
43 |
|
next => $next, |
44 |
|
show_actions => $filter->argument_value('show_actions'), |
45 |
|
r => $r |
46 |
|
&> |
47 |
% } |
% } |
48 |
</dl> |
</dl> |
49 |
|
|