[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.64,1.65

[Paul POULAIN]

Update of /cvsroot/koha/koha/C4/Circulation
In directory sc8-pr-cvs1:/tmp/cvs-serv26588/C4/Circulation

Modified Files:
	Circ2.pm 
Log Message:
fixing compilation bugs

Index: Circ2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Circ2.pm,v
retrieving revision 1.64
retrieving revision 1.65
diff -C2 -r1.64 -r1.65
*** Circ2.pm	8 Dec 2003 14:08:49 -0000	1.64
--- Circ2.pm	11 Dec 2003 12:56:34 -0000	1.65
***************
*** 158,162 ****
  		$sth->execute($borrowernumber);
  	} elsif ($cardnumber) {
! 		$sth = $dbh->$prepare("select * from borrowers where cardnumber=?");
  		$sth->execute($cardnumber);
  	} else {
--- 158,162 ----
  		$sth->execute($borrowernumber);
  	} elsif ($cardnumber) {
! 		$sth = $dbh->prepare("select * from borrowers where cardnumber=?");
  		$sth->execute($cardnumber);
  	} else {
***************
*** 987,991 ****
  					where (borrowernumber = ?)
  					and (accountno=?)");
! 			$usth->execute($amtos,$data->{'borrowernumber'},'$thisacct');
  			$usth->finish;
  			$usth = $dbh->prepare("insert into accountoffsets
--- 987,991 ----
  					where (borrowernumber = ?)
  					and (accountno=?)");
! 			$usth->execute($newamtos,$data->{'borrowernumber'},'$thisacct');
  			$usth->finish;
  			$usth = $dbh->prepare("insert into accountoffsets
***************
*** 1284,1288 ****
  	items.biblioitemnumber=biblioitems.biblioitemnumber and returndate is null
  	$crit order by issues.date_due");
! 	$sth->execute($borrownumber);
  	while (my $data = $sth->fetchrow_hashref) {
  		# FIXME - The Dewey code is a string, not a number.
--- 1284,1288 ----
  	items.biblioitemnumber=biblioitems.biblioitemnumber and returndate is null
  	$crit order by issues.date_due");
! 	$sth->execute($borrowernumber);
  	while (my $data = $sth->fetchrow_hashref) {
  		# FIXME - The Dewey code is a string, not a number.