[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/opac opac-reserve.pl [dev_week]
From: |
Joshua Ferraro |
Subject: |
[Koha-cvs] koha/opac opac-reserve.pl [dev_week] |
Date: |
Mon, 09 Oct 2006 13:22:24 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: dev_week
Changes by: Joshua Ferraro <kados> 06/10/09 13:22:24
Modified files:
opac : opac-reserve.pl
Log message:
comment out warns -- fees are broken for libraries that charge them,
I will fix soon (NPL doesn't charge fees)
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-reserve.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.22.2.9.2.2&r2=1.22.2.9.2.3
Patches:
Index: opac-reserve.pl
===================================================================
RCS file: /sources/koha/koha/opac/opac-reserve.pl,v
retrieving revision 1.22.2.9.2.2
retrieving revision 1.22.2.9.2.3
diff -u -b -r1.22.2.9.2.2 -r1.22.2.9.2.3
--- opac-reserve.pl 5 Oct 2006 19:43:17 -0000 1.22.2.9.2.2
+++ opac-reserve.pl 9 Oct 2006 13:22:24 -0000 1.22.2.9.2.3
@@ -136,9 +136,9 @@
$itm->{$itm->{'publictype'}} = 1;
# FIXME CalcReserveFee is supposed to be internal-use-only
my $fee = CalcReserveFee(undef, $borrowernumber,
$itm->{'biblionumber'},'a',($itm->{'biblioitemnumber'}));
- warn "fee found:".$fee;
+ #warn "fee found:".$fee;
$fee = sprintf "%.02f", $fee;
- warn "fee found again:".$fee;
+ #warn "fee found again:".$fee;
$itm->{'reservefee'} = $fee;
my $pty = $itm->{'publictype'};
$itemtypes{$itm->{'itemtype'}} = $itm;