From 49e2b90a8b2aba1393466674ab330b75f15a1083 Mon Sep 17 00:00:00 2001 From: rangi Date: Thu, 13 Jun 2002 03:16:55 +0000 Subject: [PATCH] Fix to get list of overdue items showing correctly --- C4/Circulation/Circ2.pm | 1 + circ/returns.pl | 1 + 2 files changed, 2 insertions(+) diff --git a/C4/Circulation/Circ2.pm b/C4/Circulation/Circ2.pm index 2d56c4e0c2..d290993360 100755 --- a/C4/Circulation/Circ2.pm +++ b/C4/Circulation/Circ2.pm @@ -504,6 +504,7 @@ sub returnbook { doreturn($borrower->{'borrowernumber'}, $iteminformation->{'itemnumber'}); $messages->{'WasReturned'}; } + ($borrower) = getpatroninformation(\%env, $currentborrower, 0); # transfer book my ($transfered, $mess, $item) = transferbook($branch, $barcode); if ($transfered) { diff --git a/circ/returns.pl b/circ/returns.pl index b24126f218..6225375c78 100755 --- a/circ/returns.pl +++ b/circ/returns.pl @@ -321,6 +321,7 @@ EOF my $itemsoverdue = ''; my $items = $flags->{$flag}->{'itemlist'}; foreach my $item (sort {$a->{'date_due'} cmp $b->{'date_due'}} @$items) { + my ($iteminformation) = getiteminformation(\%env, $item->{'itemnumber'}, 0); $itemsoverdue .= <<"EOF"; $item->{'date_due'} {'biblionumber'}&type=intra -- 2.39.5