[Koha-cvs] CVS: koha/C4 Biblio.pm,1.17,1.18
Andrew Arensburger
arensb at users.sourceforge.net
Fri Oct 11 14:34:58 CEST 2002
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} " .
More information about the Koha-cvs
mailing list