[Koha-cvs] koha/C4/Circulation Circ2.pm [dev_week]

Ryan Higgins rch at liblime.com
Thu Jan 25 05:14:43 CET 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Ryan Higgins <rych>	07/01/25 04:14:43

Modified files:
	C4/Circulation : Circ2.pm 

Log message:
	typo in sql update - setting status in accountlines.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Circulation/Circ2.pm?cvsroot=koha&only_with_tag=dev_week&r1=1.87.2.14.2.13&r2=1.87.2.14.2.14

Patches:
Index: Circ2.pm
===================================================================
RCS file: /sources/koha/koha/C4/Circulation/Circ2.pm,v
retrieving revision 1.87.2.14.2.13
retrieving revision 1.87.2.14.2.14
diff -u -b -r1.87.2.14.2.13 -r1.87.2.14.2.14
--- Circ2.pm	23 Jan 2007 07:54:04 -0000	1.87.2.14.2.13
+++ Circ2.pm	25 Jan 2007 04:14:43 -0000	1.87.2.14.2.14
@@ -3,7 +3,7 @@
 
 package C4::Circulation::Circ2;
 
-# $Id: Circ2.pm,v 1.87.2.14.2.13 2007/01/23 07:54:04 rych Exp $
+# $Id: Circ2.pm,v 1.87.2.14.2.14 2007/01/25 04:14:43 rych Exp $
 
 #package to deal with Returns
 #written 3/11/99 by olwen at katipo.co.nz
@@ -1234,7 +1234,7 @@
 	$sth->execute($brn,$itm);
 	# alter fine to show that the book has been returned
 	if (my $data = $sth->fetchrow_hashref) {
-		my $usth=$dbh->prepare("update accountlines set accounttype='F' where (borrowernumber = ?) and (itemnumber = ?) and (acccountno = ?)");
+		my $usth=$dbh->prepare("update accountlines set accounttype='F' where (borrowernumber = ?) and (itemnumber = ?) and (accountno = ?)");
 		$usth->execute($brn,$itm,$data->{'accountno'});
 		$usth->finish();
 	}





More information about the Koha-cvs mailing list