From 296d8e585768544dbd0dd9b931efd6065a25d204 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Wed, 30 Jan 2008 16:19:11 +0000
Subject: [PATCH] ensuring transactions are closed after a billing is applied
 against a negative balance transaction

git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_2@8535 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm
index 4956fe0f79..11d9b10806 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm
@@ -315,6 +315,11 @@ sub create_grocery_bill {
 	
 	$apputils->commit_db_session($session);
 
+    my $e = new_editor(xact=>1);
+    $evt = _check_open_xact($e, $transid);
+    return $evt if $evt;
+    $e->commit;
+
 	return $transid;
 }
 
-- 
2.11.0