1 |
dpavlin |
4 |
<%args> |
2 |
dpavlin |
12 |
$page => undef; |
3 |
dpavlin |
5 |
$author => undef; |
4 |
dpavlin |
10 |
$show_actions => undef; |
5 |
dpavlin |
13 |
$per_page => undef; |
6 |
dpavlin |
14 |
$from_date => undef; |
7 |
|
|
$to_date => undef; |
8 |
dpavlin |
19 |
$search => undef; |
9 |
dpavlin |
4 |
</%args> |
10 |
|
|
|
11 |
|
|
<%init> |
12 |
dpavlin |
5 |
my $filter = Jifty->web->new_action( |
13 |
|
|
class => 'Filter', |
14 |
|
|
moniker => 'filer_list', |
15 |
dpavlin |
10 |
# arguments => { |
16 |
|
|
# author => $author, |
17 |
|
|
# show_actions => $show_actions, |
18 |
|
|
# }, |
19 |
dpavlin |
5 |
); |
20 |
|
|
|
21 |
dpavlin |
4 |
my $revisions = SVNBrowser::Model::RevisionCollection->new(); |
22 |
dpavlin |
5 |
|
23 |
|
|
$author ||= $filter->argument_value('author'); |
24 |
dpavlin |
10 |
$show_actions ||= $filter->argument_value('show_actions'); |
25 |
dpavlin |
13 |
$page ||= $filter->argument_value('page') || 1; |
26 |
|
|
$per_page ||= $filter->argument_value('per_page') || 10; |
27 |
dpavlin |
14 |
$from_date ||= $filter->argument_value('from_date'); |
28 |
|
|
$to_date ||= $filter->argument_value('to_date'); |
29 |
dpavlin |
19 |
$search ||= $filter->argument_value('search'); |
30 |
dpavlin |
5 |
|
31 |
dpavlin |
14 |
$revisions->unlimit(); |
32 |
|
|
|
33 |
|
|
$revisions->limit( column => 'author', value => $author, entry_aggregator => 'AND' ) if ($author); |
34 |
|
|
$revisions->limit( column => 'commit_date', operator => '>=', value => $from_date, entry_aggregator => 'AND' ) if ($from_date); |
35 |
|
|
$revisions->limit( column => 'commit_date', operator => '<=', value => $to_date, entry_aggregator => 'AND' ) if ($to_date); |
36 |
|
|
|
37 |
dpavlin |
19 |
$revisions->limit( column => 'message', operator => 'LIKE', value => '%' . $search . '%' ) if ($search); |
38 |
|
|
|
39 |
dpavlin |
4 |
$revisions->order_by({ column => 'commit_date', order => 'desc' }); |
40 |
|
|
$revisions->set_page_info( |
41 |
|
|
current_page => $page, |
42 |
dpavlin |
13 |
per_page => $per_page, |
43 |
dpavlin |
4 |
); |
44 |
dpavlin |
14 |
|
45 |
dpavlin |
19 |
warn $revisions->build_select_query; |
46 |
|
|
|
47 |
dpavlin |
4 |
$revisions->goto_first_item; |
48 |
|
|
|
49 |
dpavlin |
8 |
|
50 |
|
|
my $actions = SVNBrowser::Model::ActionCollection->new(); |
51 |
|
|
|
52 |
dpavlin |
4 |
</%init> |
53 |
|
|
|
54 |
dpavlin |
12 |
<&| /_elements/wrapper, title => "SVN Reporitory Browser" &> |
55 |
dpavlin |
4 |
|
56 |
dpavlin |
5 |
<% Jifty->web->form->start %> |
57 |
|
|
<% $filter->form_field('author', default_value => $author ) %> |
58 |
dpavlin |
13 |
<% $filter->button( label => 'Filter commits' ) %> |
59 |
dpavlin |
10 |
<% $filter->form_field('show_actions', default_value => $show_actions ) %> |
60 |
dpavlin |
13 |
<% $filter->form_field('per_page', default_value => $per_page ) %> |
61 |
dpavlin |
14 |
<% $filter->form_field('from_date', default_value => $from_date ) %> |
62 |
|
|
<% $filter->form_field('to_date', default_value => $to_date ) %> |
63 |
dpavlin |
19 |
<% $filter->form_field('search', default_value => $search ) %> |
64 |
dpavlin |
5 |
|
65 |
dpavlin |
4 |
<%perl> |
66 |
|
|
if (my $nr = $revisions->pager->total_entries) { |
67 |
dpavlin |
13 |
$m->out("$nr revisions found"); |
68 |
dpavlin |
4 |
} else { |
69 |
dpavlin |
13 |
$m->out("No revisions found in repository"); |
70 |
dpavlin |
4 |
} |
71 |
|
|
</%perl> |
72 |
|
|
|
73 |
|
|
<dl> |
74 |
|
|
% while (my $r = $revisions->next) { |
75 |
|
|
<dt><% Jifty->web->tangent( |
76 |
dpavlin |
24 |
url => '/rev/' . $r->revision, |
77 |
dpavlin |
4 |
label => $r->revision, |
78 |
|
|
) %> |
79 |
|
|
<span class="author"><% $r->author %></span> |
80 |
|
|
<span class="commit_date"><% $r->commit_date %></span> |
81 |
|
|
</dt> |
82 |
|
|
<dd> |
83 |
dpavlin |
8 |
<pre class="commit_message"><% $r->message %></pre> |
84 |
dpavlin |
10 |
% if ($show_actions) { |
85 |
|
|
<ul class="actions"> |
86 |
dpavlin |
20 |
% $actions->unlimit; |
87 |
dpavlin |
10 |
% $actions->limit( column => 'revision', value => $r->revision ); |
88 |
|
|
% while (my $a = $actions->next) { |
89 |
|
|
<li><tt class="action-<% $a->type %>"><% $a->type %> <% $a->branch %> <% $a->rel_path %></tt></li> |
90 |
|
|
% } |
91 |
|
|
</ul> |
92 |
dpavlin |
8 |
% } |
93 |
|
|
|
94 |
dpavlin |
4 |
</dd> |
95 |
|
|
% } |
96 |
|
|
</dl> |
97 |
|
|
|
98 |
|
|
% if ($revisions->pager->previous_page) { |
99 |
dpavlin |
12 |
<% $filter->button( |
100 |
|
|
label => "<<", |
101 |
|
|
escape_label => 0, |
102 |
|
|
arguments => { |
103 |
dpavlin |
10 |
page => $revisions->pager->previous_page, |
104 |
dpavlin |
12 |
} |
105 |
dpavlin |
4 |
) %> |
106 |
|
|
% } |
107 |
|
|
|
108 |
|
|
% if ($revisions->pager->last_page > 1) { |
109 |
|
|
page <% $page %> of <% $revisions->pager->last_page %> |
110 |
|
|
% } |
111 |
|
|
|
112 |
|
|
% if ($revisions->pager->next_page) { |
113 |
dpavlin |
12 |
<% $filter->button( |
114 |
|
|
label => ">>", |
115 |
|
|
escape_label => 0, |
116 |
|
|
arguments => { |
117 |
dpavlin |
10 |
page => $revisions->pager->next_page, |
118 |
dpavlin |
12 |
} |
119 |
dpavlin |
4 |
) %> |
120 |
|
|
% } |
121 |
|
|
|
122 |
dpavlin |
12 |
<% Jifty->web->form->end %> |
123 |
|
|
|
124 |
dpavlin |
4 |
</&> |