19 |
|
|
20 |
warn "notes: ",dump($result->message, $result->error) if ($result); |
warn "notes: ",dump($result->message, $result->error) if ($result); |
21 |
|
|
22 |
my $i = 1; |
my $num = 1; |
23 |
|
|
24 |
</%init> |
</%init> |
25 |
% if ($result and $result->message) { |
% if ($result and $result->message) { |
34 |
% } |
% } |
35 |
% if ($coll) { |
% if ($coll) { |
36 |
<div class="results"> |
<div class="results"> |
37 |
% while ( my $i = $coll->next and $i++ <= $max ) { |
% while ( my $i = $coll->next and $num++ <= $max ) { |
38 |
<& "/fragments/item/$item_fragment", item => $i &> |
<& "/fragments/item/$item_fragment", item => $i &> |
39 |
% } |
% } |
40 |
</div> |
</div> |
41 |
% if ($i > $max) { |
% if ($num > $max) { |
42 |
<div class="grep-note"> |
<div class="grep-note"> |
43 |
<div class="message"> |
<div class="message"> |
44 |
Found more than <% $max %> results for '<% $q %>', refine search query.... |
Found more than <% $max %> results for '<% $q %>', refine search query.... |