[Koha-cvs] koha/circ circulation.pl [rel_2_2]
Ryan Higgins
rch at liblime.com
Tue May 1 17:21:07 CEST 2007
CVSROOT: /sources/koha
Module name: koha
Branch: rel_2_2
Changes by: Ryan Higgins <rych> 07/05/01 15:21:07
Modified files:
circ : circulation.pl
Log message:
get overdue, issues _after_ issuing. otherwise issuecount is wrong.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/circ/circulation.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.81.2.22&r2=1.81.2.23
Patches:
Index: circulation.pl
===================================================================
RCS file: /sources/koha/koha/circ/circulation.pl,v
retrieving revision 1.81.2.22
retrieving revision 1.81.2.23
diff -u -b -r1.81.2.22 -r1.81.2.23
--- circulation.pl 28 Apr 2007 20:25:01 -0000 1.81.2.22
+++ circulation.pl 1 May 2007 15:21:07 -0000 1.81.2.23
@@ -133,7 +133,6 @@
my $borrower;
if ($borrowernumber) {
$borrower = getpatroninformation(\%env,$borrowernumber,0);
- my ($od,$issue,$fines)=borrdata2(\%env,$borrowernumber);
#warn $borrower->{'expiry'};
my $warningdate = DateCalc($borrower->{'expiry'},"- ".C4::Context->preference('NotifyBorrowerDeparture')." days");
my $offset = '+ '.$borrower->{'enrolmentperiod'}.' years';
@@ -145,9 +144,6 @@
$template->param(warndeparture=>$warning,
renewaldate=>$renewaldate);
}
- $template->param(overduecount => $od,
- issuecount => $issue,
- finetotal => $fines);
}
@@ -189,6 +185,10 @@
# reload the borrower info for the sake of reseting the flags.....
if ($borrowernumber) {
$borrower = getpatroninformation(\%env,$borrowernumber,0);
+ my ($od,$issue,$fines)=borrdata2(\%env,$borrowernumber);
+ $template->param(overduecount => $od,
+ issuecount => $issue,
+ finetotal => $fines);
}
@@ -338,7 +338,6 @@
);
}
-
if ($branchcookie) {
$cookie=[$cookie, $branchcookie, $printercookie];
}
More information about the Koha-cvs
mailing list