/[Search-Estraier]/trunk/Estraier.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 /trunk/Estraier.pm

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

revision 135 by dpavlin, Tue May 9 12:42:39 2006 UTC revision 136 by dpavlin, Tue May 9 14:03:36 2006 UTC
# Line 1781  sub master { Line 1781  sub master {
1781                  map {                  map {
1782                          croak "need parametar '$_' for action '$action'" unless ($args->{$_});                          croak "need parametar '$_' for action '$action'" unless ($args->{$_});
1783                          push @args, $_ . '=' . uri_escape( $args->{$_} );                          push @args, $_ . '=' . uri_escape( $args->{$_} );
1784                  } ( keys %{ $rest->{required} } );                  } ( @{ $rest->{required} } );
1785    
1786                  map {                  map {
1787                          push @args, $_ . '=' . uri_escape( $args->{$_} ) if ($args->{$_});                          push @args, $_ . '=' . uri_escape( $args->{$_} ) if ($args->{$_});
1788                  } ( keys %{ $rest->{optional} } );                  } ( @{ $rest->{optional} } );
1789    
1790          }          }
1791    
# Line 1819  sub master { Line 1819  sub master {
1819                          return @results;                          return @results;
1820    
1821                  } elsif ($resbody) {                  } elsif ($resbody) {
1822                            chomp $resbody;
1823                          return $resbody;                          return $resbody;
1824                  } else {                  } else {
1825                          return 0E0;                          return 0E0;
Legend:
Removed from v.135  
changed lines
  Added in v.136
  ViewVC Help
Powered by ViewVC 1.1.26