From 27b2c2caf5ea455663253189c797bbbf4ab0807f Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Wed, 22 Oct 2008 20:29:16 +0000
Subject: Corrected missing commit on draft deletion Corrected inadequate
 cleanup on draft deletion

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2377 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/DBObject/Draft.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'LedgerSMB')

diff --git a/LedgerSMB/DBObject/Draft.pm b/LedgerSMB/DBObject/Draft.pm
index b57bd238..1cfe16b4 100644
--- a/LedgerSMB/DBObject/Draft.pm
+++ b/LedgerSMB/DBObject/Draft.pm
@@ -24,6 +24,7 @@ sub delete {
        $self->error($self->{_locale}->text('No ID Set'));
    }
    ($self->{deleted}) = $self->exec_method(funcname => 'draft_delete');
+   $self->{dbh}->commit;
    return $self->{deleted};
 }
 
-- 
cgit v1.2.3