[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha pay.pl [dev_week]
From: |
Kyle Hall |
Subject: |
[Koha-cvs] koha pay.pl [dev_week] |
Date: |
Mon, 26 Mar 2007 16:28:42 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: dev_week
Changes by: Kyle Hall <kylemhall> 07/03/26 16:28:42
Modified files:
. : pay.pl
Log message:
recordpayment was not inserting the branchcode
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/pay.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.9.2.5.2.2&r2=1.9.2.5.2.3
Patches:
Index: pay.pl
===================================================================
RCS file: /sources/koha/koha/Attic/pay.pl,v
retrieving revision 1.9.2.5.2.2
retrieving revision 1.9.2.5.2.3
diff -u -b -r1.9.2.5.2.2 -r1.9.2.5.2.3
--- pay.pl 22 Mar 2007 14:59:16 -0000 1.9.2.5.2.2
+++ pay.pl 26 Mar 2007 16:28:42 -0000 1.9.2.5.2.3
@@ -2,7 +2,7 @@
# WARNING: Not enough context to figure out the correct tabstop size
# WARNING: Assume that this file uses 4-character tabs
-# $Id: pay.pl,v 1.9.2.5.2.2 2007/03/22 14:59:16 kylemhall Exp $
+# $Id: pay.pl,v 1.9.2.5.2.3 2007/03/26 16:28:42 kylemhall Exp $
#written 11/1/2000 by address@hidden
#part of the koha library system, script to facilitate paying off fines
@@ -95,7 +95,9 @@
$user =~ s/Foxton/F/i;
$user =~ s/Shannon/S/i;
-$env{'branchcode'} = $user;
+#FIXME: what the heck did the following line ever do?
+#$env{'branchcode'} = $user;
+$env{'branchcode'} = $branch;
my $total = $input->param('total');