Fix to returns

C4/Circulation/Returns.pm

@@ -70,7 +70,7 @@ sub Returns {
 # until (($reason eq "Circ") || ($reason eq "Quit")) {
   until ($reason ne "") {
     ($reason,$item) =  returnwindow($env,"Enter Returns",$item,\@items,$borrower,$amt_owing);
-    debug_msg($env,$reason);
+    #debug_msg($env,"R1. $reason");
     #if (($reason ne "Circ") && ($reason ne "Quit")) {
     if ($reason eq "")  {
       ($reason,$bornum,$borrower,$itemno,$itemrec,$amt_owing) = checkissue($env,$dbh,$item);
@@ -79,8 +79,11 @@ sub Returns {
 	  my $fmtitem = fmtstr($env,$itemrec->{'title'},"L50");
       	  unshift @items,$fmtitem;
           $reason = "";     	  
+  	} elsif ($reason eq "Item not found" ) {
+	  error_msg($env,"$reason");
+	  $reason = "";
 	} else {
-            debug_msg($env,$reason);
+          debug_msg($env,"R2. $reason");
 	}
       #}
     }