[Koha-cvs] CVS: koha request.pl,1.12,1.13

[Finlay Thompson]

Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv6110

Modified Files:
	request.pl 
Log Message:

another little tinker. long overdues are now requestable.


Index: request.pl
===================================================================
RCS file: /cvsroot/koha/koha/request.pl,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -r1.12 -r1.13
*** request.pl	22 Aug 2002 02:31:58 -0000	1.12
--- request.pl	22 Aug 2002 04:45:07 -0000	1.13
***************
*** 84,88 ****
      $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$//;
--- 84,87 ----
***************
*** 91,96 ****
      my $select;
      if (($data[$i]->{'notforloan'}) 
! 	|| ($data[$i]->{'itemlost'} == 1)
! 	|| ($data[$i]->{'itemlost'} == 2))  {
  	$select = "Cannot be reserved.";
      } else {
--- 90,94 ----
      my $select;
      if (($data[$i]->{'notforloan'}) 
! 	|| ($data[$i]->{'itemlost'} == 1))  {
  	$select = "Cannot be reserved.";
      } else {