SF.net SVN: ledger-smb:[4700] branches/1.3/bin/io.pl

[..hidden..]

Revision: 4700
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4700&view=rev
Author:   einhverfr
Date:     2012-05-07 02:52:34 +0000 (Mon, 07 May 2012)
Log Message:
-----------
making sure that taxes now see subtotal as such

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

Modified: branches/1.3/bin/io.pl
===================================================================
--- branches/1.3/bin/io.pl	2012-05-07 02:47:09 UTC (rev 4699)
+++ branches/1.3/bin/io.pl	2012-05-07 02:52:34 UTC (rev 4700)
@@ -85,6 +85,7 @@
 # $locale->text('Dec')
 
 sub _calc_taxes {
+    $form->{subtotal} = $form->{invsubtotal};
     for $i (1 .. $form->{rowcount}){
         my $linetotal = 
              $form->parse_amount(\%myconfig, $form->{"sellprice_$i"}) 

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