[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
  	)=@_;
***************
*** 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} " .