/[Grep]/share/web/templates/fragments/results
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 /share/web/templates/fragments/results

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

revision 40 by dpavlin, Tue Feb 20 10:54:47 2007 UTC revision 50 by dpavlin, Wed Feb 21 13:29:30 2007 UTC
# Line 1  Line 1 
1  <%args>  <%args>
2  $item_fragment => 'long'  $q
3  $max => 10  $max => 10
4    $item_fragment => 'long'
5  $coll => undef  $coll => undef
6  $moniker => 'search'  $result_moniker => 'search'
7  $q  $result => undef
8  </%args>  </%args>
9  <%init>  <%init>
10    
11  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
12    
13  my $results = Jifty->web->response->result( $moniker );  $result ||= Jifty->web->response->result( $result_moniker );
14  if ( $results and $results->content('search') ) {  if ( $result and $result->content('search') ) {
15          $coll = $results->content('search');          $coll = $result->content('search');
16  } elsif (! $coll) {  } elsif (! defined($coll)) {
17  #       warn "called without results for $moniker";          warn "called without result for $result_moniker";
18  }  }
19    
20  my $i = 1;  warn "notes: ",dump($result->message, $result->error) if ($result);
21    
22    my $num = 1;
23    
24    my ($prev,$next) = (undef, $num + 1);
25    
26  </%init>  </%init>
27    % if ($result and $result->message) {
28    <div class="grep-note">
29    <div class="message"><% $result->message %></div>
30    </div>
31    % }
32    % if ($result and $result->error) {
33    <div class="grep-note">
34    <div class="error"><% $result->error %></div>
35    </div>
36    % }
37  % if ($coll) {  % if ($coll) {
38  <div class="results">  <div class="results">
39  %       while ( my $i = $coll->next and $i++ <= $max ) {  %       while ( my $i = $coll->next and $num <= $max ) {
40  <& "/fragments/item/$item_fragment", item => $i &>  %               $next = $num == $max ? undef : $num + 1;
41    <a name="r<% $num %>"/>
42    <& "/fragments/item/$item_fragment", item => $i, prev => $prev, next => $next &>
43    %               $prev = $num++;
44  %       }  %       }
45  </div>  </div>
46  %       if ($i > $max) {  %       if ($num > $max) {
47  <div class="grep-note">  <div class="grep-note">
48  <div class="message">  <div class="message">
49  Found more than <% $max %> results for '<% $q %>', refine search query....  Found more than <% $max %> results for '<% $q %>', refine search query....
Legend:
Removed from v.40  
changed lines
  Added in v.50
  ViewVC Help
Powered by ViewVC 1.1.26