--- branches/ffzg/WebPac.pm 2004/04/18 01:03:27 321
+++ branches/ffzg/WebPac.pm 2004/12/08 18:45:32 601
@@ -183,7 +183,9 @@
my @persist_vars = @_;
my $hidden_vars = '';
foreach my $v (@persist_vars) {
- $hidden_vars .= ''."\n";
+ foreach my $val ($q->param($v)) {
+ $hidden_vars .= ''."\n";
+ }
}
$tmpl->param('PAGER_HIDDEN', $hidden_vars);
@@ -322,12 +324,13 @@
# construct swish query
my $sw_q = join(" and ",@s_arr);
- if (@path_arr && $q->param('show_full')) {
+ if (@path_arr) {
$sw_q .= "and (swishdocpath=\"";
$sw_q .= join("\" or swishdocpath=\"",@path_arr);
$sw_q .= "\")";
- $tmpl->param('full',1); # show full records
- } elsif ($q->param('show_full')) {
+ }
+
+ if ($q->param('show_full')) {
# just show full path, no path defined
$tmpl->param('full',1);
} else {