From 100bd0da0783c604e1a84f3ac411ab2936352c6d Mon Sep 17 00:00:00 2001 From: gmc Date: Thu, 7 Oct 2010 21:39:05 +0000 Subject: [PATCH] choose the hold permit test variant correctly Signed-off-by: Galen Charlton git-svn-id: svn://svn.open-ils.org/ILS/trunk@18228 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Utils/PermitHold.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Utils/PermitHold.pm b/Open-ILS/src/perlmods/OpenILS/Utils/PermitHold.pm index 55bd22dcf3..47a561aea8 100644 --- a/Open-ILS/src/perlmods/OpenILS/Utils/PermitHold.pm +++ b/Open-ILS/src/perlmods/OpenILS/Utils/PermitHold.pm @@ -204,7 +204,7 @@ my $LEGACY_HOLD_EVENT_MAP = { sub indb_hold_permit { my $params = shift; - my $function = $$params{retarget} ? 'action.hold_request_permit_test' : 'action.hold_retarget_permit_test'; + my $function = $$params{retarget} ? 'action.hold_retarget_permit_test' : 'action.hold_request_permit_test'; my $patron_id = ref($$params{patron}) ? $$params{patron}->id : $$params{patron_id}; my $request_lib = -- 2.11.0