From e783d17dd9470f2dc2868e05119ea5bdaf0d00aa Mon Sep 17 00:00:00 2001 From: einhverfr Date: Tue, 20 Nov 2007 19:43:27 +0000 Subject: A few more Customer improvements git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1882 4979c152-3d1c-0410-bac9-87ea11338e46 --- LedgerSMB/DBObject/Customer.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'LedgerSMB/DBObject') diff --git a/LedgerSMB/DBObject/Customer.pm b/LedgerSMB/DBObject/Customer.pm index 9a120f91..aa4404ce 100644 --- a/LedgerSMB/DBObject/Customer.pm +++ b/LedgerSMB/DBObject/Customer.pm @@ -9,7 +9,9 @@ sub save { # This saves both the entity and the credit account. -- CT $self->{entity_class} = 2; - $self->{id} = $self->exec_method(funcname => 'entity_credit_save'); + + $self->{entity_id} = $self->exec_method(funcname => 'entity_credit_save'); + $self->{dbh}->commit; } sub get_metadata { -- cgit v1.2.3