summaryrefslogtreecommitdiff
path: root/LedgerSMB/AA.pm
diff options
context:
space:
mode:
authortetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2007-11-12 04:13:00 +0000
committertetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2007-11-12 04:13:00 +0000
commitaaff4863acc381f1473c7a4a15abf7b69f43372c (patch)
tree83a36ef44dd480ec82df17002c81f9fd61e12485 /LedgerSMB/AA.pm
parentb104daca7daad975d45dbdc5b7dfd76a64b3deed (diff)
Shift the extraction of invnumber down a few lines (fixes 1820572)
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1862 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/AA.pm')
-rw-r--r--LedgerSMB/AA.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/LedgerSMB/AA.pm b/LedgerSMB/AA.pm
index 649856a1..c539a34a 100644
--- a/LedgerSMB/AA.pm
+++ b/LedgerSMB/AA.pm
@@ -70,8 +70,6 @@ sub post_transaction {
# connect to database
my $dbh = $form->{dbh};
- $form->{invnumber} = $form->update_defaults( $myconfig, $invnumber )
- unless $form->{invnumber};
my $query;
my $sth;
@@ -94,6 +92,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;