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

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

revision 1251 by dpavlin, Sun Jul 12 15:10:23 2009 UTC revision 1252 by mglavica, Mon Jul 27 13:40:29 2009 UTC
# Line 12  sub title { Line 12  sub title {
12          my ($self,$title,$data) = @_;          my ($self,$title,$data) = @_;
13          my $biblionumber = $data->{biblionumber} || die; # title only without biblionumber          my $biblionumber = $data->{biblionumber} || die; # title only without biblionumber
14    
15          qq|<a target="koha.ffzg.hr" href="http://koha.ffzg.hr/cgi-bin/koha/opac-detail.pl?biblionumber=$biblionumber">$title</a>|;          my $responsibility = $1 if $title =~ s{(\s+/\s+.+)$}{};
16    
17            qq|<a target="koha.ffzg.hr" href="http://koha.ffzg.hr/cgi-bin/koha/opac-detail.pl?biblionumber=$biblionumber">$title</a>$responsibility|;
18  }  }
19    
20  1;  1;
Legend:
Removed from v.1251  
changed lines
  Added in v.1252
  ViewVC Help
Powered by ViewVC 1.1.26