projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
1f2a500
)
fix credit application, at least in vedeya's case on HEAD, RT#6819, fallout from...
author
ivan
<ivan>
Sat, 19 Dec 2009 23:28:13 +0000
(23:28 +0000)
committer
ivan
<ivan>
Sat, 19 Dec 2009 23:28:13 +0000
(23:28 +0000)
FS/FS/cust_bill_ApplicationCommon.pm
patch
|
blob
|
history
diff --git
a/FS/FS/cust_bill_ApplicationCommon.pm
b/FS/FS/cust_bill_ApplicationCommon.pm
index
30243e2
..
cb21732
100644
(file)
--- a/
FS/FS/cust_bill_ApplicationCommon.pm
+++ b/
FS/FS/cust_bill_ApplicationCommon.pm
@@
-154,7
+154,10
@@
sub calculate_applications {
$self->cust_bill->invnum. ": ". join(', ', @open). "\n"
if $DEBUG;
my $total = 0;
- $total += $_->owed_setup + $_->owed_recur foreach @open;
+ foreach (@open) {
+ $total += $_->owed_setup if $_->setup;
+ $total += $_->owed_recur if $_->recur;
+ }
$total = sprintf('%.2f', $total);
if ( $self->amount > $total ) {