182 |
my $tmpl = shift @_; |
my $tmpl = shift @_; |
183 |
my @persist_vars = @_; |
my @persist_vars = @_; |
184 |
my $hidden_vars = ''; |
my $hidden_vars = ''; |
185 |
|
my $hidden_search = ''; |
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 |
$hidden_vars .= '<input type="hidden" name="'.$v.'" value="'.$val.'"/>'."\n"; |
$hidden_vars .= '<input type="hidden" name="'.$v.'" value="'.$val.'"/>'."\n"; |
190 |
|
$hidden_search .= '<input type="hidden" name="'.$v.'" value="'.$val.'"/>'."\n" if ($v ne "rm"); |
191 |
} |
} |
192 |
} |
} |
193 |
|
|
194 |
$tmpl->param('PAGER_HIDDEN', $hidden_vars); |
$tmpl->param('PAGER_HIDDEN', $hidden_vars); |
195 |
|
$tmpl->param('SEARCH_HIDDEN', $hidden_search); |
196 |
$tmpl->param('PAGER_JAVASCRIPT', qq# |
$tmpl->param('PAGER_JAVASCRIPT', qq# |
197 |
<SCRIPT LANGUAGE="Javascript"> |
<SCRIPT LANGUAGE="Javascript"> |
198 |
<!-- Begin |
<!-- Begin |
227 |
|
|
228 |
my $q = $self->query(); |
my $q = $self->query(); |
229 |
|
|
230 |
|
# submit was reset? |
231 |
|
if ($q->param('reset')) { |
232 |
|
$q->delete_all; |
233 |
|
return $self->show_search_form(); |
234 |
|
} |
235 |
|
|
236 |
# load template for this page |
# load template for this page |
237 |
|
|
238 |
my @s_arr; # all queries are located here |
my @s_arr; # all queries are located here |