[open-ils-commits] r12926 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2009-04-20 16:04:11 -0400 (Mon, 20 Apr 2009)
New Revision: 12926

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
Log:
oops, gotta commit

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2009-04-20 19:35:02 UTC (rev 12925)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2009-04-20 20:04:11 UTC (rev 12926)
@@ -1741,6 +1741,7 @@
     my $mgr = OpenILS::Application::Acq::BatchManager->new(editor => $e, conn => $conn);
     my $pl = $e->retrieve_acq_picklist($picklist_id) or return $e->die_event;
     delete_picklist($mgr, $pl) or return $e->die_event;
+    $e->commit;
     return $mgr->respond_complete;
 }