diff options
author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-12-28 00:21:00 +0000 |
---|---|---|
committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-12-28 00:21:00 +0000 |
commit | f6a3a83e348394b45c5e27c7cc89703d5887d9cb (patch) | |
tree | fc528af98f02dd06cbfb04fb9ff3aa30361b8d3e /bin | |
parent | efdfb3adb9411f04893fcd44ac0a470d44b2ed6d (diff) |
Fixing a number formatting bug in AP invoice display
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@2009 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/ir.pl | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -487,8 +487,10 @@ qq|<textarea name="intnotes" rows="$rows" cols="35" wrap="soft">$form->{intnotes my $taccno = $item; $form->{invtotal} += $form->round_amount($form->{taxes}{$item}, 2); $form->{"${taccno}_total"} = - $form->round_amount($form->{taxes}{$item}, 2); - $tax .= qq| + $form->format_amount(\%myconfig, + $form->round_amount($form->{taxes}{$item}, 2), + 2); + $tax .= qq| <tr> <th align="right">$form->{"${item}_description"}</th> <td align="right">$form->{"${item}_total"}</td> |