/[webpac2]/trunk/vhost/ecas/html.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/vhost/ecas/html.pm

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

revision 1370 by mglavica, Fri Oct 22 14:12:25 2010 UTC revision 1371 by dpavlin, Sun Jan 27 19:24:38 2013 UTC
# Line 11  sub url { Line 11  sub url {
11  sub urlp {  sub urlp {
12          my ($self,$urlp) = @_;          my ($self,$urlp) = @_;
13          my $proxy = $urlp;          my $proxy = $urlp;
14          $proxy =~ s{http://}{https://proxy.knjiznice.ffzg.hr/proxy/nph-proxy.cgi/000100A/http/};          $proxy =~ s{http://}{http://proxy.knjiznice.ffzg.hr/proxy/nph-proxy.cgi/00/http/};
15          qq{ <a target="ecas" href="$proxy">Pristup od kuće</a> };          qq{ <a target="ecas" href="$proxy">Pristup od kuće</a> };
16  }  }
17    
18  sub urlpe {  sub urlpe {
19          my ($self,$urlpe) = @_;          my ($self,$urlpe) = @_;
20          my $proxy = $urlpe;          my $proxy = $urlpe;
21          $proxy =~ s{http://}{https://proxy.knjiznice.ffzg.hr/proxy/nph-proxy2.cgi/000100A/http/};          $proxy =~ s{http://}{http://proxy.knjiznice.ffzg.hr/proxy/nph-proxy.cgi/00/http/};
22          qq{ <a target="ecas" href="$proxy">Pristup od kuće</a> };          qq{ <a target="ecas" href="$proxy">Pristup od kuće</a> };
23  }  }
24    
Legend:
Removed from v.1370  
changed lines
  Added in v.1371
  ViewVC Help
Powered by ViewVC 1.1.26