--- 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 {