[Koha-cvs] CVS: koha/opac opac-detail.pl,1.14.2.4,1.14.2.5

Joshua Ferraro joshferraro at users.sourceforge.net
Fri Jul 1 20:39:02 CEST 2005


Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12562

Modified Files:
      Tag: rel_2_2
	opac-detail.pl 
Log Message:
Allows opac-detail.pl to display Table of Contents and Descriptions
when they exist in the MARC record (in 856u).


Index: opac-detail.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-detail.pl,v
retrieving revision 1.14.2.4
retrieving revision 1.14.2.5
diff -C2 -r1.14.2.4 -r1.14.2.5
*** opac-detail.pl	28 Jun 2005 07:35:48 -0000	1.14.2.4
--- opac-detail.pl	1 Jul 2005 18:38:59 -0000	1.14.2.5
***************
*** 68,76 ****
  	my $marcnotesarray = &getMARCnotes($dbh,$bibid,$marcflavour);
  	my $marcsubjctsarray = &getMARCsubjects($dbh,$bibid,$marcflavour);
  
  	$template->param(MARCNOTES => $marcnotesarray);
  	$template->param(MARCSUBJCTS => $marcsubjctsarray);
  }
- 
  my @results = ($dat,);
  
--- 68,77 ----
  	my $marcnotesarray = &getMARCnotes($dbh,$bibid,$marcflavour);
  	my $marcsubjctsarray = &getMARCsubjects($dbh,$bibid,$marcflavour);
+ 	my $marcurlsarray = &getMARCurls($dbh,$bibid,$marcflavour);
  
  	$template->param(MARCNOTES => $marcnotesarray);
  	$template->param(MARCSUBJCTS => $marcsubjctsarray);
+         $template->param(MARCURLS => $marcurlsarray);
  }
  my @results = ($dat,);
  





More information about the Koha-cvs mailing list