SF.net SVN: ledger-smb:[4105] branches/1.3/bin/oe.pl

[..hidden..]

Revision: 4105
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4105&view=rev
Author:   tshvr
Date:     2011-11-27 18:09:37 +0000 (Sun, 27 Nov 2011)
Log Message:
-----------
oe.pl _calc_taxes called 2x in update when inserting new item

Modified Paths:
--------------
    branches/1.3/bin/oe.pl

Modified: branches/1.3/bin/oe.pl
===================================================================
--- branches/1.3/bin/oe.pl	2011-11-27 12:55:17 UTC (rev 4104)
+++ branches/1.3/bin/oe.pl	2011-11-27 18:09:37 UTC (rev 4105)
@@ -639,6 +639,7 @@
 }
 
 sub form_footer {
+     #print STDERR localtime()." oe.pl form_footer calling __calc_taxes\n";
     _calc_taxes();
 
     $form->{invtotal} = $form->{invsubtotal};
@@ -1129,7 +1130,8 @@
                     $form->{"${_}_base"} += $amount;
                 }
                 if ( !$form->{taxincluded} ) {
-                    _calc_taxes();
+                    #print STDERR localtime()."HV oe.pl update after retrieve item,skipping __calc_taxes,because this will be done again in form_footer\n";
+                    #_calc_taxes();
                 }
 
                 $form->{creditremaining} -= $amount;

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