From 20735bf13454c3d9bdcc958805228c85ec7af031 Mon Sep 17 00:00:00 2001 From: Mike Rylander Date: Fri, 24 Jun 2011 14:55:49 -0400 Subject: [PATCH] Filter out copies that have a monograph part designator when the hold is a non-P hold Signed-off-by: Mike Rylander Signed-off-by: Jason Etheridge --- .../src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm index c9743e2721..ca1e0dfde5 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm @@ -1270,7 +1270,8 @@ sub new_hold_copy_targeter { isTrue($_->location->holdable) && isTrue($_->holdable) && !isTrue($_->deleted) && - (isTrue($hold->mint_condition) ? isTrue($_->mint_condition) : 1) + (isTrue($hold->mint_condition) ? isTrue($_->mint_condition) : 1) && + ($hold->hold_type ne 'P' ? @{ $_->part_maps } == 0 : 1) } @$all_copies; # let 'em know we're still working -- 2.11.0