[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4/Circulation Fines.pm [dev_week]
From: |
Kyle Hall |
Subject: |
[Koha-cvs] koha/C4/Circulation Fines.pm [dev_week] |
Date: |
Thu, 03 Apr 2008 14:34:27 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: dev_week
Changes by: Kyle Hall <kylemhall> 08/04/03 14:34:27
Modified files:
C4/Circulation : Fines.pm
Log message:
Changed fine description a bit.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Circulation/Fines.pm?cvsroot=koha&only_with_tag=dev_week&r1=1.9.2.2.2.2&r2=1.9.2.2.2.3
Patches:
Index: Fines.pm
===================================================================
RCS file: /sources/koha/koha/C4/Circulation/Fines.pm,v
retrieving revision 1.9.2.2.2.2
retrieving revision 1.9.2.2.2.3
diff -u -b -r1.9.2.2.2.2 -r1.9.2.2.2.3
--- Fines.pm 1 Apr 2008 15:18:21 -0000 1.9.2.2.2.2
+++ Fines.pm 3 Apr 2008 14:34:27 -0000 1.9.2.2.2.3
@@ -1,6 +1,6 @@
package C4::Circulation::Fines;
-# $Id: Fines.pm,v 1.9.2.2.2.2 2008/04/01 15:18:21 kylemhall Exp $
+# $Id: Fines.pm,v 1.9.2.2.2.3 2008/04/03 14:34:27 kylemhall Exp $
# Copyright 2000-2002 Katipo Communications
#
@@ -426,7 +426,7 @@
if ( $amount > 0 ) {
my $fineData = _GetFineData( $itembarcode, $itemnumber );
- my $description = $fineData->{'title'} . " ( " . $fineData->{'barcode'} .
" ) on " . $fineData->{'date_due'};
+ my $description = $fineData->{'title'} . " ( " . $fineData->{'barcode'} .
" )";
UpdateFine( $fineData->{'itemnumber'}, $fineData->{'borrowernumber'},
$amount, my $type = 'F', $description );
}
}