From 66656c93c14e06bc3a57a9cc122cdbbb7d35923c Mon Sep 17 00:00:00 2001 From: Jeff Davis Date: Thu, 22 Nov 2018 15:46:56 -0800 Subject: [PATCH] LP1804716: grab recall-able copies before they are filtered out Signed-off-by: Jeff Davis Signed-off-by: Bill Erickson --- Open-ILS/src/perlmods/lib/OpenILS/Utils/HoldTargeter.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Utils/HoldTargeter.pm b/Open-ILS/src/perlmods/lib/OpenILS/Utils/HoldTargeter.pm index 392822a1c0..a42638c806 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Utils/HoldTargeter.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Utils/HoldTargeter.pm @@ -733,13 +733,13 @@ sub filter_closed_date_copies { sub filter_copies_by_status { my $self = shift; + # Track checked out copies for later recall + $self->recall_copies([grep {$_->{status} == 1} @{$self->copies}]); + $self->copies([ grep {$_->{status} == 0 || $_->{status} == 7} @{$self->copies} ]); - # Track checked out copies for later recall - $self->recall_copies([grep {$_->{status} == 1} @{$self->copies}]); - return 1; } -- 2.43.2