From 2e2ba350ccf044ac274748b7d6f6e19d776120b7 Mon Sep 17 00:00:00 2001 From: erickson Date: Mon, 23 Oct 2006 14:02:01 +0000 Subject: [PATCH] calling hold targeter on all newly created holds git-svn-id: svn://svn.open-ils.org/ILS/trunk@6494 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm index 1a61ed7398..7d3bb29c6e 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm @@ -74,7 +74,7 @@ sub create_hold { my $holds = (ref($holds[0] eq 'ARRAY')) ? $holds[0] : [@holds]; - my @copyholds; +# my @copyholds; for my $hold (@$holds) { @@ -142,17 +142,19 @@ sub create_hold { $hold->request_lib($e->requestor->ws_ou); $hold->selection_ou($recipient->home_ou) unless $hold->selection_ou; $hold = $e->create_action_hold_request($hold) or return $e->event; - push( @copyholds, $hold ) if $hold->hold_type eq OILS_HOLD_TYPE_COPY; +# push( @copyholds, $hold ) if $hold->hold_type eq OILS_HOLD_TYPE_COPY; } $e->commit; + $conn->respond_complete(1); + # Go ahead and target the copy-level holds $U->storagereq( 'open-ils.storage.action.hold_request.copy_targeter', - undef, $_->id ) for @copyholds; + undef, $_->id ) for @holds; - return 1; + return undef; } sub __create_hold { -- 2.11.0