186 |
foreach my $v (@persist_vars) { |
foreach my $v (@persist_vars) { |
187 |
foreach my $val ($q->param($v)) { |
foreach my $val ($q->param($v)) { |
188 |
next if (! $val || $val eq ''); |
next if (! $val || $val eq ''); |
189 |
|
$val =~ s/"/"e;/g; |
190 |
$hidden_vars .= '<input type="hidden" name="'.$v.'" value="'.$val.'"/>'."\n"; |
$hidden_vars .= '<input type="hidden" name="'.$v.'" value="'.$val.'"/>'."\n"; |
191 |
$hidden_search .= '<input type="hidden" name="'.$v.'" value="'.$val.'"/>'."\n" if ($v ne "rm"); |
$hidden_search .= '<input type="hidden" name="'.$v.'" value="'.$val.'"/>'."\n" if ($v ne "rm"); |
192 |
} |
} |
228 |
|
|
229 |
my $q = $self->query(); |
my $q = $self->query(); |
230 |
|
|
231 |
|
# submit was reset? |
232 |
|
if ($q->param('reset')) { |
233 |
|
$q->delete_all; |
234 |
|
return $self->show_search_form(); |
235 |
|
} |
236 |
|
|
237 |
# load template for this page |
# load template for this page |
238 |
|
|
239 |
my @s_arr; # all queries are located here |
my @s_arr; # all queries are located here |
274 |
push @url_params_persist,"f$i=".$q->url_param("f$i") if ($persist); |
push @url_params_persist,"f$i=".$q->url_param("f$i") if ($persist); |
275 |
|
|
276 |
foreach my $v ($q->url_param("v$i")) { |
foreach my $v ($q->url_param("v$i")) { |
277 |
|
# escape quotes so that phrase search work |
278 |
|
$v =~ s/"/%22/g; |
279 |
push @url_params,"v$i=$v"; |
push @url_params,"v$i=$v"; |
280 |
push @url_params_persist,"v$i=$v" if ($persist); |
push @url_params_persist,"v$i=$v" if ($persist); |
281 |
} |
} |
485 |
$tmpl->param('field',$field); |
$tmpl->param('field',$field); |
486 |
$tmpl->param('limit',$limit); |
$tmpl->param('limit',$limit); |
487 |
$tmpl->param('total',$total); |
$tmpl->param('total',$total); |
488 |
|
$tmpl->param('filter',$filter); |
489 |
|
|
490 |
# FIXME I should set offset and leave out limit from fetch!! |
# FIXME I should set offset and leave out limit from fetch!! |
491 |
# if (! $q->param("PAGER_offset") { |
# if (! $q->param("PAGER_offset") { |