[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/C4/Circulation Borrissues.pm,1.2,1.2.2.1
From: |
Andrew Arensburger |
Subject: |
[Koha-cvs] CVS: koha/C4/Circulation Borrissues.pm,1.2,1.2.2.1 |
Date: |
Thu, 03 Oct 2002 19:27:02 -0700 |
Update of /cvsroot/koha/koha/C4/Circulation
In directory usw-pr-cvs1:/tmp/cvs-serv19093
Modified Files:
Tag: arensb-context
Borrissues.pm
Log Message:
Use C4::Connect instead of C4::Database, C4::Connect->dbh instead
C4Connect.
Index: Borrissues.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Borrissues.pm,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -C2 -r1.2 -r1.2.2.1
*** Borrissues.pm 14 Aug 2002 18:12:52 -0000 1.2
--- Borrissues.pm 4 Oct 2002 02:27:00 -0000 1.2.2.1
***************
*** 25,29 ****
require Exporter;
use DBI;
! use C4::Database;
use C4::Print;
use C4::Format;
--- 25,29 ----
require Exporter;
use DBI;
! use C4::Context;
use C4::Print;
use C4::Format;
***************
*** 74,78 ****
my ($env,$borrower)address@hidden;
my @issues;
! my $dbh=C4Connect;
my $query = "select * from issues,items,biblioitems,biblio
where borrowernumber = '$borrower->{'borrowernumber'}'
--- 74,78 ----
my ($env,$borrower)address@hidden;
my @issues;
! my $dbh = C4::Context->dbh;
my $query = "select * from issues,items,biblioitems,biblio
where borrowernumber = '$borrower->{'borrowernumber'}'
***************
*** 90,94 ****
}
$sth->finish();
- $dbh->disconnect();
remoteprint ($env,address@hidden,$borrower);
}
--- 90,93 ----
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/C4/Circulation Borrissues.pm,1.2,1.2.2.1,
Andrew Arensburger <=