SF.net SVN: ledger-smb: [1862] trunk/LedgerSMB/AA.pm

[..hidden..]

Revision: 1862
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=1862&view=rev
Author:   tetragon
Date:     2007-11-11 20:13:00 -0800 (Sun, 11 Nov 2007)

Log Message:
-----------
Shift the extraction of invnumber down a few lines (fixes 1820572)

Modified Paths:
--------------
    trunk/LedgerSMB/AA.pm

Modified: trunk/LedgerSMB/AA.pm
===================================================================
--- trunk/LedgerSMB/AA.pm	2007-11-09 19:35:33 UTC (rev 1861)
+++ trunk/LedgerSMB/AA.pm	2007-11-12 04:13:00 UTC (rev 1862)
@@ -70,8 +70,6 @@
 
     # 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 @@
         $ml        = -1;
         $invnumber = "vinumber";
     }
+    $form->{invnumber} = $form->update_defaults( $myconfig, $invnumber )
+      unless $form->{invnumber};
 
     if ( $form->{currency} eq $form->{defaultcurrency} ) {
         $form->{exchangerate} = 1;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.