[Koha-cvs] CVS: koha updatecharges.pl,1.2,1.3
Andrew Arensburger
arensb at users.sourceforge.net
Sat Oct 5 11:47:31 CEST 2002
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv20142
Modified Files:
updatecharges.pl
Log Message:
Merged with arensb-context branch: use C4::Context->dbh instead of
&C4Connect, and generally prefer C4::Context over C4::Database.
Index: updatecharges.pl
===================================================================
RCS file: /cvsroot/koha/koha/updatecharges.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** updatecharges.pl 14 Aug 2002 18:12:51 -0000 1.2
--- updatecharges.pl 5 Oct 2002 09:47:29 -0000 1.3
***************
*** 26,31 ****
use strict;
use CGI;
use C4::Output;
- use C4::Database;
my $input = new CGI;
--- 26,31 ----
use strict;
use CGI;
+ use C4::Context;
use C4::Output;
my $input = new CGI;
***************
*** 35,39 ****
! my $dbh=C4Connect;
#print $input->dump;
my @names=$input->param();
--- 35,39 ----
! my $dbh = C4::Context->dbh;
#print $input->dump;
my @names=$input->param();
***************
*** 52,56 ****
$sth->finish;
}
- $dbh->disconnect;
print $input->redirect("/cgi-bin/koha/charges.pl");
#print endmenu('issue');
--- 52,55 ----
More information about the Koha-cvs
mailing list