From e04f9382c578010b355fe9ad214cf06b197ef9d5 Mon Sep 17 00:00:00 2001
From: Mike Rylander <mrylander@gmail.com>
Date: Thu, 14 Jul 2011 11:42:26 -0400
Subject: [PATCH] Correct CDBI thinko -- search_where is smart about wantarray,
search is not
Signed-off-by: Mike Rylander <mrylander@gmail.com>
---
.../src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm | 2 +-
1 file changed, 1 insertion(+), 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 ca1e0dfde5..23717a78d8 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
@@ -1271,7 +1271,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 } == 0 : 1)
+ ($hold->hold_type ne 'P' ? $_->part_maps->count == 0 : 1)
} @$all_copies;
# let 'em know we're still working
--
2.11.0