From: Thomas Berezansky <tsbere@mvlc.org>
Date: Thu, 21 Jun 2012 19:35:08 +0000 (-0400)
Subject: Copy Holds should ignore parts
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=refs%2Fheads%2Fuser%2Ftsbere%2Fcopy_part_hold;p=working%2FEvergreen.git

Copy Holds should ignore parts

Because part or not, there is only one thing that can fill them. Thus, teach
the hold targeter to not throw out copies with parts for copy holds.

Signed-off-by: Thomas Berezansky <tsbere@mvlc.org>
---

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 7c07e6f188..99e8d9a11c 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
@@ -1253,7 +1253,7 @@ sub new_hold_copy_targeter {
 			    			isTrue($_->holdable) &&
 				    		!isTrue($_->deleted) &&
 					    	(isTrue($hold->mint_condition) ? isTrue($_->mint_condition) : 1) &&
-						    ($hold->hold_type ne 'P' ? $_->part_maps->count == 0 : 1)
+						    (($hold->hold_type ne 'P' && $hold->hold_type ne 'C') ? $_->part_maps->count == 0 : 1)
     					} @$all_copies;
             }