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

[Paul POULAIN]

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,
! );
  }