From c9dc65b8f390b2ae7c6286d2e97d3a5007b5e7a9 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Mon, 20 Apr 2009 17:31:26 +0000
Subject: [PATCH] respond after li update, may not be any lid's

git-svn-id: svn://svn.open-ils.org/ILS/trunk@12917 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
index c7671d85cb..7d0fc983dc 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
@@ -1662,8 +1662,9 @@ sub clone_picklist_api {
             # copy the lineitem details
             my $lid = $e->retrieve_acq_lineitem_detail($lid_id);
             create_lineitem_detail($mgr, %{$lid->to_bare_hash}, lineitem => $new_li->id) or return $e->die_event;
-            $mgr->respond;
         }
+
+        $mgr->respond;
     }
 
     $e->commit;
-- 
2.43.2