LP1929741 Delete action trumps ischanged for LID's

Signed-off-by: Bill Erickson <berickxx@gmail.com>
Signed-off-by: Galen Charlton <gmc@equinoxOLI.org>
Signed-off-by: Jane Sandberg <js7389@princeton.edu>

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 d9d52fd..ad2d46d 100644 (file)
--- 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);