cancel hold before deleting copy

aadl · Aug 15, 2019 · 929dcd6 · 929dcd6
1 parent 3895771
commit 929dcd6
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/iNCIPit.cgi b/iNCIPit.cgi
@@ -512,7 +512,8 @@ sub item_cancelled {
         $barcode .= $faidValue;
         my $copy = copy_from_barcode($barcode);
         fail( $copy->{textcode} . " $barcode" ) unless ( blessed $copy);
-        my $r = delete_copy($copy);
+        my $r = cancel_hold($barcode);
+        $r = delete_copy($copy);
     } else {
         # we are the item agency
         unless ( $conf->{behavior}->{no_item_agency_holds} =~ m/^y/i ) {