From 433010c7c3ae8f28639c12b9ffc95c204e45e7bb Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Tue, 17 Apr 2007 22:17:15 +0000
Subject: Fixing sales tax display issue

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1081 4979c152-3d1c-0410-bac9-87ea11338e46
---
 bin/is.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'bin/is.pl')

diff --git a/bin/is.pl b/bin/is.pl
index 7bc792b6..ac2235d6 100755
--- a/bin/is.pl
+++ b/bin/is.pl
@@ -540,10 +540,10 @@ qq|<textarea name=intnotes rows=$rows cols=35 wrap=soft>$form->{intnotes}</texta
 
     if ( !$form->{taxincluded} ) {
         my @taxes = Tax::init_taxes( $form, $form->{taxaccounts} );
-        $form->{invtotal} +=
-          Tax::calculate_taxes( \@taxes, $form, $form->{invsubtotal}, 0 );
         foreach $item (@taxes) {
             my $taccno = $item->account;
+	    $form->{invtotal} += $form->round_amount( 
+                $form->{"${taccno}_rate"} * $form->{"${taccno}_base"}, 2);
             $form->{"${taccno}_total"} =
               $form->format_amount( \%myconfig,
                 $form->{"${taccno}_rate"} * $form->{"${taccno}_base"}, 2 );
@@ -552,7 +552,7 @@ qq|<textarea name=intnotes rows=$rows cols=35 wrap=soft>$form->{intnotes}</texta
       	<th align=right>$form->{"${taccno}_description"}</th>
       	<td align=right>$form->{"${taccno}_total"}</td>
         </tr>
-	| if $item->value;
+	| if $form->{"${taccno}_base"};
         }
 
         $form->{invsubtotal} =
-- 
cgit v1.2.3