From: Bill Erickson Date: Wed, 29 Oct 2014 17:08:10 +0000 (-0400) Subject: LP#1386347 Remove more unneeded map deleters X-Git-Tag: sprint4-merge-nov22~1745 X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=a04701774c43dbb0dd07ac5c33bac0581ed7d8fb;p=working%2FEvergreen.git LP#1386347 Remove more unneeded map deleters Signed-off-by: Bill Erickson Signed-off-by: Mike Rylander --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm index 1cf8cc8bed..869894f205 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm @@ -404,13 +404,6 @@ sub cancel_hold_list { $hold->cancel_cause(1); # un-targeted expiration. Do we need an alternate "target deleted" cause? $editor->update_action_hold_request($hold) or return $editor->die_event; - # delete the copy maps. - my $maps = $editor->search_action_hold_copy_map({hold => $hold->id}); - for(@$maps) { - $editor->delete_action_hold_copy_map($_) - or return $editor->die_event; - } - # tell A/T the hold was cancelled. Don't wait for a response.. my $at_ses = OpenSRF::AppSession->create('open-ils.trigger'); $at_ses->request( diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/BibCommon.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/BibCommon.pm index 0e9da73c4a..c461dba2ac 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/BibCommon.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/BibCommon.pm @@ -365,12 +365,6 @@ sub delete_rec { $hold->cancel_cause(1); # un-targeted expiration. $editor->update_action_hold_request($hold) or return $editor->die_event; - my $maps = $editor->search_action_hold_copy_map({hold => $hold->id}); - for(@$maps) { - $editor->delete_action_hold_copy_map($_) - or return $editor->die_event; - } - my $at_ses = OpenSRF::AppSession->create('open-ils.trigger'); $at_ses->request( 'open-ils.trigger.event.autocreate',