From df564b43138224091d1c3bc10dc6cb5756e11d51 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Fri, 11 Jun 2021 10:28:06 -0400 Subject: [PATCH] LP1929741 Delete action trumps ischanged for LID's Signed-off-by: Bill Erickson --- Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm index 675352ca08..1a05a5ce11 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Acq/Order.pm @@ -2076,11 +2076,11 @@ sub lineitem_detail_CUD_batch { create_lineitem_detail_debit($mgr, $li, $lid, 0, 1) or return $e->die_event; } - } elsif($lid->ischanged) { - return $evt if $evt = handle_changed_lid($e, $lid, $dry_run, $fund_cache); - } elsif($lid->isdeleted) { delete_lineitem_detail($mgr, $lid) or return $e->die_event; + + } elsif($lid->ischanged) { + return $evt if $evt = handle_changed_lid($e, $lid, $dry_run, $fund_cache); } $mgr->respond(li => $li); -- 2.11.0