From d96ae9ae655edd147428bedbcb9aaad4bd098d39 Mon Sep 17 00:00:00 2001 From: finlayt Date: Thu, 22 Aug 2002 04:45:07 +0000 Subject: [PATCH] another little tinker. long overdues are now requestable. --- request.pl | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/request.pl b/request.pl index e392f75e85..1bd575a63f 100755 --- a/request.pl +++ b/request.pl @@ -83,15 +83,13 @@ for (my $i=0; $i<$count2; $i++) { $data[$i]->{'dewey'}="" if ($data[$i]->{'dewey'} == 0); - warn "Itemlost: $data[$i]->{itemlost} \n"; $data[$i]->{'volumeddesc'} = " " unless $data[$i]->{'volumeddesc'}; $data[$i]->{'dewey'}=~ s/\.0000$//; $data[$i]->{'dewey'}=~ s/00$//; my $class="$data[$i]->{'classification'}$data[$i]->{'dewey'}$data[$i]->{'subclass'}"; my $select; if (($data[$i]->{'notforloan'}) - || ($data[$i]->{'itemlost'} == 1) - || ($data[$i]->{'itemlost'} == 2)) { + || ($data[$i]->{'itemlost'} == 1)) { $select = "Cannot be reserved."; } else { $select = " {'biblioitemnumber'}>{'biblioitemnumber'}>"; -- 2.39.5