/[webpac2]/trunk/lib/WebPAC/Output/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/lib/WebPAC/Output/Estraier.pm

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

revision 283 by dpavlin, Fri Dec 16 16:00:24 2005 UTC revision 284 by dpavlin, Sun Dec 18 16:22:58 2005 UTC
# Line 17  WebPAC::Output::Estraier - Create Hyper Line 17  WebPAC::Output::Estraier - Create Hyper
17    
18  =head1 VERSION  =head1 VERSION
19    
20  Version 0.05  Version 0.06
21    
22  =cut  =cut
23    
24  our $VERSION = '0.05';  our $VERSION = '0.06';
25    
26  =head1 SYNOPSIS  =head1 SYNOPSIS
27    
# Line 239  sub master { Line 239  sub master {
239                  validate => 'master',                  validate => 'master',
240                  rest_url => $self->{masterurl} . '/master?action=' . $action ,                  rest_url => $self->{masterurl} . '/master?action=' . $action ,
241                  action => $action,                  action => $action,
242                    %{ $args },
243          );          );
244  }  }
245    
# Line 322  sub estcall { Line 323  sub estcall {
323                  $del = '&';                  $del = '&';
324          }          }
325    
326          if ($url_args) {          $url .= $url_args if ($url_args);
                 $url_args =~ s#^\&#?# if ($url =~ m#\?#);  
                 $url .= $url_args;  
         }  
327    
328          $log->debug("calling $url");          $log->debug("calling $url");
329    
Legend:
Removed from v.283  
changed lines
  Added in v.284
  ViewVC Help
Powered by ViewVC 1.1.26