From: Bill Erickson <berick@esilibrary.com>
Date: Thu, 15 Sep 2011 17:38:17 +0000 (-0400)
Subject: Create events for hold_request.cancel.patron
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=refs%2Fheads%2Fuser%2Fberick%2Fpatron-cancel-holds-hook;p=working%2FEvergreen.git

Create events for hold_request.cancel.patron

When a patron cancels his/her own hold, create events for the
(already-existing) hold_request.cancel.patron A/T hook.

Signed-off-by: Bill Erickson <berick@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm
index 584b4c7671..3524161986 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm
@@ -760,8 +760,11 @@ sub cancel_hold {
 
 	$e->commit;
 
-    $U->create_events_for_hook('hold_request.cancel.staff', $hold, $hold->pickup_lib)
-        if $e->requestor->id != $hold->usr;
+    if ($e->requestor->id == $hold->usr) {
+        $U->create_events_for_hook('hold_request.cancel.patron', $hold, $hold->pickup_lib)
+    } else {
+        $U->create_events_for_hook('hold_request.cancel.staff', $hold, $hold->pickup_lib)
+    }
 
 	return 1;
 }