From ee9ee388f71a7253ecff875008da80934eb63216 Mon Sep 17 00:00:00 2001 From: finlayt Date: Mon, 30 Sep 2002 00:53:27 +0000 Subject: [PATCH] Fixed bug so that items appear as reserved only when they actually are! --- moremember.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/moremember.pl b/moremember.pl index 1c3e439199..5126c18690 100755 --- a/moremember.pl +++ b/moremember.pl @@ -263,8 +263,8 @@ for (my $i=0;$i<$count;$i++){ # print "   "; # } #check item is not reserved - my ($rescount,$reserves)=Findgroupreserve($issue->[$i]{'biblioitemnumber'},$issue->[$i]{'biblionumber'}); - if ($rescount >0){ + my ($restype,$reserves)=CheckReserves($issue->[$i]{'itemnumber'}); + if ($restype){ print "[$i]{'biblionumber'}>On Request - no renewals"; # } elsif ($issue->[$i]->{'renewals'} > 0) { # print "Previously Renewed - no renewals"; -- 2.39.5