[Koha-cvs] CVS: koha/C4 Biblio.pm,1.17,1.18

[Andrew Arensburger]

Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv731

Modified Files:
        Biblio.pm 
Log Message:
Replaced &requireDBI with C4::Context->dbh


Index: Biblio.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Biblio.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -r1.17 -r1.18
*** Biblio.pm   10 Oct 2002 14:48:25 -0000      1.17
--- Biblio.pm   11 Oct 2002 12:34:53 -0000      1.18
***************
*** 2,5 ****
--- 2,8 ----
  # $Id$
  # $Log$
+ # Revision 1.18  2002/10/11 12:34:53  arensb
+ # Replaced &requireDBI with C4::Context->dbh
+ #
  # Revision 1.17  2002/10/10 14:48:25  tipaul
  # bugfixes
***************
*** 2005,2008 ****
--- 2008,2012 ----
        my (
          $dbh,         # db handle
+                       # FIXME - Unused argument
          $biblio,      # hash ref to fields
        )address@hidden;
***************
*** 2016,2020 ****
  
        #-----
!       requireDBI($dbh,"getoraddbiblio");
  
        print "<PRE>Looking for biblio </PRE>\n" if $debug;
--- 2020,2024 ----
  
        #-----
!       $dbh = C4::Context->dbh;
  
        print "<PRE>Looking for biblio </PRE>\n" if $debug;
***************
*** 2845,2848 ****
--- 2849,2853 ----
        my (
          $dbh,                 # DBI handle
+                               # FIXME - Unused argument
          $biblio,              # hash ref to biblio record
          $biblioitem,          # hash ref to biblioitem record
***************
*** 2859,2863 ****
  
        #--------
!       requireDBI($dbh,"newcompletebiblioitem");
  
        print "<PRE>Trying to add biblio item Title=$biblio->{title} " .
--- 2864,2868 ----
  
        #--------
!       $dbh = C4::Context->dbh;
  
        print "<PRE>Trying to add biblio item Title=$biblio->{title} " .