/[SVNBrowser]/branches/filter-action/lib/SVNBrowser/Action/Filter.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /branches/filter-action/lib/SVNBrowser/Action/Filter.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

trunk/lib/SVNBrowser/Action/Filter.pm revision 14 by dpavlin, Wed Dec 6 20:42:13 2006 UTC branches/filter-action/lib/SVNBrowser/Action/Filter.pm revision 31 by dpavlin, Sun Dec 10 19:00:27 2006 UTC
# Line 24  use Jifty::Action schema { Line 24  use Jifty::Action schema {
24                                  function => 'distinct',                                  function => 'distinct',
25                          );                          );
26                          $authors->unlimit;                          $authors->unlimit;
27                            $authors->order_by({ column => 'author', order => 'ASC' });
28                            warn "authors ", $authors->build_select_query;
29                          [{                          [{
30                                  display_from => 'author',                                  display_from => 'author',
31                                  value_from => 'author',                                  value_from => 'author',
# Line 31  use Jifty::Action schema { Line 33  use Jifty::Action schema {
33                          }];                          }];
34                  };                  };
35    
36            param branch =>
37                    label is 'In branch',
38                    render as 'combobox',
39                    available are defer {
40                            my $branches = SVNBrowser::Model::BranchCollection->new;
41                            $branches->column(
42                                    column => 'path',
43                                    function => 'distinct',
44                            );
45                            $branches->unlimit;
46                            $branches->order_by({ column => 'path', order => 'ASC' });
47                            warn "branches ", $branches->build_select_query;
48                            [{
49                                    display_from => 'path',
50                                    value_from => 'path',
51                                    collection => $branches,
52                            }];
53                    };
54    
55          param show_actions =>          param show_actions =>
56                  label is 'Show file actions',                  label is 'Show file actions',
57                  render as 'checkbox';                  render as 'checkbox';
# Line 51  use Jifty::Action schema { Line 72  use Jifty::Action schema {
72                  label is 'To date',                  label is 'To date',
73                  render as 'Date';                  render as 'Date';
74    
75            param search =>
76                    label is 'Search in messages';
77    
78  };  };
79    
# Line 63  sub sticky_on_success { 1; } Line 86  sub sticky_on_success { 1; }
86  sub take_action {  sub take_action {
87      my $self = shift;      my $self = shift;
88            
89          my $author = $self->argument_value('author');          my $revisions = SVNBrowser::Model::RevisionCollection->new();
90            $revisions->unlimit();
91    
92            if ( my $author = $self->argument_value('author') ) {
93                    $revisions->limit( column => 'author', value => $author, entry_aggregator => 'AND' );
94            }
95    
96            if ( my $from_date = $self->argument_value('from_date') ) {
97                    $revisions->limit( column => 'commit_date', operator => '>=', value => $from_date, entry_aggregator => 'AND' );
98            }
99    
100            if ( my $to_date = $self->argument_value('to_date') ) {
101                    $revisions->limit( column => 'commit_date', operator => '>=', value => $to_date, entry_aggregator => 'AND' );
102            }
103    
104            if ( my $search = $self->argument_value('search') ) {
105                    $revisions->limit( column => 'message', operator => 'LIKE', value => '%' . $search . '%' );
106            }
107    
108            if ( my $branch = $self->argument_value('branch') ) {
109                    my $b = SVNBrowser::Model::Branch->new();
110                    $b->load_by_cols( path => $branch );
111    
112                    my $rev_branches = $revisions->join(
113                            alias1 => 'main', column1 => 'revision',
114                            table2 => 'revision_branches', column2 => 'revision'
115                    );
116                    $revisions->limit( alias => $rev_branches, column => 'branch', value => $b->id );
117            }
118    
119            $revisions->order_by({ column => 'commit_date', order => 'desc' });
120            $revisions->set_page_info(
121                    current_page => $self->argument_value('page'),
122                    per_page => $self->argument_value('per_page'),
123            );
124    
125            warn "take_action SQL: ", $revisions->build_select_query;
126    
127            $revisions->goto_first_item;
128    
129          my $msg = '';          my $msg = '';
130          $msg .= "Showing only commits for $author" if ($author);          if (my $nr = $revisions->pager->total_entries) {
131          $msg .= ( $msg ? ' and file actions' : 'Showing file actions for each commit' ) if ( $self->argument_value('show_actions') );                          $msg .= "Found $nr revisions";
132      $self->result->message($msg) if ($msg);          } else {
133                                $msg .= "No revisions found";
134            }
135    
136        $self->result->message($msg);
137    
138            $self->result->content( revisions => $revisions );
139    
140      return 1;      return 1;
141  }  }
142    
Legend:
Removed from v.14  
changed lines
  Added in v.31
  ViewVC Help
Powered by ViewVC 1.1.26