From 009374c358c223a1575f9581be01f0863df82556 Mon Sep 17 00:00:00 2001 From: miker Date: Thu, 13 Mar 2008 16:38:43 +0000 Subject: [PATCH] making old_best tests more explicit git-svn-id: svn://svn.open-ils.org/ILS/trunk@9002 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../OpenILS/Application/Storage/Publisher/action.pm | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm index 699b2ebb0b..cb6b06a8ee 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm @@ -951,11 +951,7 @@ sub new_hold_copy_targeter { if (!scalar(@good_copies)) { $log->info("\tNo (non-current) copies eligible to fill the hold."); - if ( - $old_best && - grep { $old_best eq $_ } @$all_copies && - !action::hold_request->search_where({ current_copy => $old_best->id, capture_time => undef, cancel_time => undef }) - ) { + if ( $old_best && grep { ''.$old_best->id eq ''.$_->id } @$all_copies ) { # the old copy is still available $log->debug("\tPushing current_copy back onto the targeting list"); push @good_copies, $old_best; -- 2.43.2