/[webpac]/branches/fsb/WebPac.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /branches/fsb/WebPac.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 688 by dpavlin, Tue Mar 1 19:32:23 2005 UTC revision 689 by dpavlin, Wed Mar 2 16:49:32 2005 UTC
# Line 186  sub make_pager_vars { Line 186  sub make_pager_vars {
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/"/&quote;/g;                          $val =~ s/"/"/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                  }                  }

Legend:
Removed from v.688  
changed lines
  Added in v.689

  ViewVC Help
Powered by ViewVC 1.1.26