From 08d26bcc75b79b60d65dd1c03701949b03877d27 Mon Sep 17 00:00:00 2001 From: tonnesen Date: Thu, 24 Oct 2002 20:09:29 +0000 Subject: [PATCH] Removing ReserveWaiting call pending further discussion... --- C4/Circulation/Circ2.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/C4/Circulation/Circ2.pm b/C4/Circulation/Circ2.pm index ab5c59e4b5..34d7904b8c 100755 --- a/C4/Circulation/Circ2.pm +++ b/C4/Circulation/Circ2.pm @@ -1024,7 +1024,7 @@ sub returnbook { # find reserves..... my ($resfound, $resrec) = CheckReserves($iteminformation->{'itemnumber'}); if ($resfound) { - my $tobrcd = ReserveWaiting($resrec->{'itemnumber'}, $resrec->{'borrowernumber'}); +# my $tobrcd = ReserveWaiting($resrec->{'itemnumber'}, $resrec->{'borrowernumber'}); $resrec->{'ResFound'} = $resfound; $messages->{'ResFound'} = $resrec; } @@ -1721,7 +1721,7 @@ sub calc_charges { } $sth1->finish; # close FILE; - return ($charge, $itemtype); + return ($charge, $item_type); } # FIXME - A virtually identical function appears in -- 2.39.5