From: Bill Erickson <berickxx@gmail.com>
Date: Thu, 19 Aug 2021 16:03:13 +0000 (-0400)
Subject: LP1904036 Checkin never capture deleted copies for holds
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=e28b1d64268e3c4e0f93fb2281974fcd2d378a94;p=Evergreen.git

LP1904036 Checkin never capture deleted copies for holds

Signed-off-by: Bill Erickson <berickxx@gmail.com>
Signed-off-by: Jane Sandberg <js7389@princeton.edu>
Signed-off-by: Galen Charlton <gmc@equinoxOLI.org>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm
index 0e417c593f..0546e525eb 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Circulate.pm
@@ -2670,6 +2670,9 @@ sub do_checkin {
         OpenILS::Event->new('ASSET_COPY_NOT_FOUND')) 
         unless $self->copy;
 
+    # Never capture a deleted copy for a hold.
+    $self->capture('nocapture') if $U->is_true($self->copy->deleted);
+
     $self->fix_broken_transit_status; # if applicable
     $self->check_transit_checkin_interval;
     $self->checkin_retarget;