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