Fix HoldIsAvailable validator

Depending on the environment some things may be ids or references.

Comparisons should try and use the IDs only, so pull the IDs out.

Signed-off-by: Thomas Berezansky <tsbere@mvlc.org>
Signed-off-by: Bill Erickson <berick@esilibrary.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Trigger/Validator.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Trigger/Validator.pm
index 57563e0..55c5742 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Trigger/Validator.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Trigger/Validator.pm
@@ -77,7 +77,8 @@ sub HoldIsAvailable {
         !$hold->cancel_time and
         !$hold->fulfillment_time and
         $hold->current_shelf_lib and
-        $hold->current_shelf_lib eq $hold->pickup_lib and
+        (ref $hold->current_shelf_lib ? $hold->current_shelf_lib->id : $hold->current_shelf_lib)
+            eq (ref $hold->pickup_lib ? $hold->pickup_lib->id : $hold->pickup_lib) and
         $hold->capture_time and # redundant
         $hold->current_copy and # redundant
         $hold->shelf_time and   # redundant