From 2b4ec03f194111cccb574579930a8f0641c3581e Mon Sep 17 00:00:00 2001
From: tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Mon, 12 Nov 2007 04:14:09 +0000
Subject: Shift the extraction of invnumber down a few lines (fixes 1820572)

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1863 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/AA.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/LedgerSMB/AA.pm b/LedgerSMB/AA.pm
index 22c490dc..bda4971b 100755
--- a/LedgerSMB/AA.pm
+++ b/LedgerSMB/AA.pm
@@ -39,8 +39,6 @@ use LedgerSMB::Sysconfig;
 sub post_transaction {
 
     my ( $self, $myconfig, $form ) = @_;
-    $form->{invnumber} = $form->update_defaults( $myconfig, $invnumber )
-      unless $form->{invnumber};
 
     # connect to database
     my $dbh = $form->{dbh};
@@ -66,6 +64,8 @@ sub post_transaction {
         $ml        = -1;
         $invnumber = "vinumber";
     }
+    $form->{invnumber} = $form->update_defaults( $myconfig, $invnumber)
+      unless $form->{invnumber};
 
     if ( $form->{currency} eq $form->{defaultcurrency} ) {
         $form->{exchangerate} = 1;
-- 
cgit v1.2.3