/[webpac]/branches/unesco/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/unesco/WebPac.pm

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

revision 321 by dpavlin, Sun Apr 18 01:03:27 2004 UTC revision 458 by dpavlin, Tue Sep 21 16:53:44 2004 UTC
# Line 183  sub make_pager_vars { Line 183  sub make_pager_vars {
183          my @persist_vars = @_;          my @persist_vars = @_;
184          my $hidden_vars = '';          my $hidden_vars = '';
185          foreach my $v (@persist_vars) {          foreach my $v (@persist_vars) {
186                  $hidden_vars .= '<input type="hidden" name="'.$v.'" value="'.$q->param($v).'"/>'."\n";                  foreach my $val ($q->param($v)) {
187                            $hidden_vars .= '<input type="hidden" name="'.$v.'" value="'.$val.'"/>'."\n";
188                    }
189          }          }
190    
191          $tmpl->param('PAGER_HIDDEN', $hidden_vars);          $tmpl->param('PAGER_HIDDEN', $hidden_vars);

Legend:
Removed from v.321  
changed lines
  Added in v.458

  ViewVC Help
Powered by ViewVC 1.1.26