diff options
Diffstat (limited to 'FS/FS/part_pkg/discount_Mixin.pm')
-rw-r--r-- | FS/FS/part_pkg/discount_Mixin.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/FS/FS/part_pkg/discount_Mixin.pm b/FS/FS/part_pkg/discount_Mixin.pm index df65e97..a0bdcee 100644 --- a/FS/FS/part_pkg/discount_Mixin.pm +++ b/FS/FS/part_pkg/discount_Mixin.pm @@ -42,6 +42,7 @@ sub calc_discount { my($self, $cust_pkg, $sdate, $details, $param ) = @_; my $br = $self->base_recur($cust_pkg); + $br += $param->{'override_charges'} if $param->{'override_charges'}; my $tot_discount = 0; #UI enforces just 1 for now, will need ordering when they can be stacked |