[Koha-cvs] CVS: koha detail.pl,1.24.2.1,1.24.2.2

Paul POULAIN tipaul at users.sourceforge.net
Mon Aug 1 15:18:53 CEST 2005


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

Modified Files:
      Tag: rel_2_2
	detail.pl 
Log Message:
fix for : 
http://bugs.koha.org/cgi-bin/bugzilla/show_bug.cgi?id=996
Can't delete a biblio - javascript error

Index: detail.pl
===================================================================
RCS file: /cvsroot/koha/koha/detail.pl,v
retrieving revision 1.24.2.1
retrieving revision 1.24.2.2
diff -C2 -r1.24.2.1 -r1.24.2.2
*** detail.pl	3 Feb 2005 15:25:28 -0000	1.24.2.1
--- detail.pl	1 Aug 2005 13:18:51 -0000	1.24.2.2
***************
*** 47,61 ****
  $template->param(norequests => $norequests);
  
!   ## get notes and subjects from MARC record
! my $marc = C4::Context->preference("marc");
! if ($marc eq "yes") {
! 	my $dbh = C4::Context->dbh;
! 	my $bibid = &MARCfind_MARCbibid_from_oldbiblionumber($dbh,$biblionumber);
  	my $marcflavour = C4::Context->preference("marcflavour");
  	my $marcnotesarray = &getMARCnotes($dbh,$bibid,$marcflavour);
  	my $marcsubjctsarray = &getMARCsubjects($dbh,$bibid,$marcflavour);
  
! 	$template->param(MARCNOTES => $marcnotesarray);
! 	$template->param(MARCSUBJCTS => $marcsubjctsarray);
  }
  
--- 47,62 ----
  $template->param(norequests => $norequests);
  
! ## get notes and subjects from MARC record
! my $dbh = C4::Context->dbh;
! my $bibid = &MARCfind_MARCbibid_from_oldbiblionumber($dbh,$biblionumber);
! $template->param(bibid => $bibid);
! if (C4::Context->preference("marc") eq "yes") {
  	my $marcflavour = C4::Context->preference("marcflavour");
  	my $marcnotesarray = &getMARCnotes($dbh,$bibid,$marcflavour);
  	my $marcsubjctsarray = &getMARCsubjects($dbh,$bibid,$marcflavour);
  
! 	$template->param(MARCNOTES => $marcnotesarray,
! 					MARCSUBJCTS => $marcsubjctsarray,
! );
  }
  





More information about the Koha-cvs mailing list