Removing ReserveWaiting call pending further discussion...

diff --git a/C4/Circulation/Circ2.pm b/C4/Circulation/Circ2.pm
index ab5c59e..34d7904 100755 (executable)
--- a/C4/Circulation/Circ2.pm
+++ b/C4/Circulation/Circ2.pm
@@ -1024,7 +1024,7 @@ sub returnbook {
 # find reserves.....
     my ($resfound, $resrec) = CheckReserves($iteminformation->{'itemnumber'});
     if ($resfound) {
-       my $tobrcd = ReserveWaiting($resrec->{'itemnumber'}, $resrec->{'borrowernumber'});
+#      my $tobrcd = ReserveWaiting($resrec->{'itemnumber'}, $resrec->{'borrowernumber'});
        $resrec->{'ResFound'} = $resfound;
        $messages->{'ResFound'} = $resrec;
     }
@@ -1721,7 +1721,7 @@ sub calc_charges {
     }
     $sth1->finish;
 #    close FILE;
-    return ($charge, $itemtype);
+    return ($charge, $item_type);
 }
 
 # FIXME - A virtually identical function appears in