--- trunk/WebPac.pm 2005/02/15 21:48:16 659
+++ trunk/WebPac.pm 2005/02/24 09:11:35 677
@@ -182,14 +182,17 @@
my $tmpl = shift @_;
my @persist_vars = @_;
my $hidden_vars = '';
+ my $hidden_search = '';
foreach my $v (@persist_vars) {
foreach my $val ($q->param($v)) {
next if (! $val || $val eq '');
$hidden_vars .= ''."\n";
+ $hidden_search .= ''."\n" if ($v ne "rm");
}
}
$tmpl->param('PAGER_HIDDEN', $hidden_vars);
+ $tmpl->param('SEARCH_HIDDEN', $hidden_search);
$tmpl->param('PAGER_JAVASCRIPT', qq#