Another attempted fix for issuing bug, can NPL test this please.
authorrangi <rangi>
Mon, 4 Aug 2003 01:53:55 +0000 (01:53 +0000)
committerrangi <rangi>
Mon, 4 Aug 2003 01:53:55 +0000 (01:53 +0000)
It seems to be working ok for me

C4/Circulation/Circ2.pm

index 3afcd1c..23d4005 100755 (executable)
@@ -691,7 +691,7 @@ sub issuebook {
                                my ($resborrower, $flags)=getpatroninformation($env, $resbor,0);
                                my $branches = getbranches();
                                my $branchname = $branches->{$res->{'branchcode'}}->{'branchname'};
-                               if ($responses->{5} eq '') {
+                               if ($responses->{5} eq '' && $responses->{7} eq '') {
                                        $questionnumber=5;
                                        $question="Reserved for $resborrower->{'firstname'} $resborrower->{'surname'} ($resborrower->{'cardnumber'}) since $res->{'reservedate'} \nAllow issue?";
                                        $defaultanswer='N';