From 014cc1cd543407e45d55a684679d2256806aa5b1 Mon Sep 17 00:00:00 2001 From: tipaul Date: Wed, 14 Sep 2005 14:27:48 +0000 Subject: [PATCH] * removing warn * extending notforloan checking to itemtype notforloan field --- opac/opac-detail.pl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl index 48e7ef873d..c2b00b0e26 100755 --- a/opac/opac-detail.pl +++ b/opac/opac-detail.pl @@ -35,7 +35,6 @@ my ($websitecount, @websites) = &getwebsites($biblionumber); my @subscriptions = getsubscriptions($dat->{title},$dat->{issn},$biblionumber); my @subs; foreach my $subscription (@subscriptions){ - warn "subsid :".$subscription->{subscriptionid}; my %cell; $cell{subscriptionid}= $subscription->{subscriptionid}; $cell{subscriptionnotes}= $subscription->{notes}; @@ -53,7 +52,7 @@ for (my $i = 1; $i < $authorcount; $i++) { my $norequests = 1; foreach my $itm (@items) { - $norequests = 0 unless (($itm->{'wthdrawn'}) || ($itm->{'itemlost'}) || ($itm->{'itemnotforloan'}) ||(!$itm->{'itemnumber'})); + $norequests = 0 unless (($itm->{'wthdrawn'}) || ($itm->{'itemlost'}) || ($itm->{'notforloan'})|| ($itm->{'itemnotforloan'}) ||(!$itm->{'itemnumber'})); $itm->{$itm->{'publictype'}} = 1; } -- 2.39.5