From a04701774c43dbb0dd07ac5c33bac0581ed7d8fb Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Wed, 29 Oct 2014 13:08:10 -0400 Subject: [PATCH] LP#1386347 Remove more unneeded map deleters Signed-off-by: Bill Erickson Signed-off-by: Mike Rylander --- .../perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm | 7 ------- .../src/perlmods/lib/OpenILS/Application/Cat/BibCommon.pm | 6 ------ 2 files changed, 13 deletions(-) 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', -- 2.43.2