diff options
author | Ivan Kohler <ivan@freeside.biz> | 2019-07-26 11:11:58 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2019-07-26 11:11:58 -0700 |
commit | 9c72b62d9f3685ed6e4120c2e3a628b82979cf42 (patch) | |
tree | ff3e093501a88dfcf0a602c8ae25a115c94bc5c4 /FS/FS/part_pkg | |
parent | cc4e6579fd8aade3bf74cf9d8d826fe33576ccc8 (diff) |
clarify interface difference between calc_setup and calc_recur: calc_setup takes a start time, calc_recur takes a start time scalar reference, RT#83503
Diffstat (limited to 'FS/FS/part_pkg')
-rw-r--r-- | FS/FS/part_pkg/currency_fixed.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/FS/FS/part_pkg/currency_fixed.pm b/FS/FS/part_pkg/currency_fixed.pm index 41d7a65..d4c1487 100644 --- a/FS/FS/part_pkg/currency_fixed.pm +++ b/FS/FS/part_pkg/currency_fixed.pm @@ -39,22 +39,22 @@ sub price_info { } sub base_setup { - my($self, $cust_pkg, $sdate, $details, $param ) = @_; + my($self, $cust_pkg, $time, $details, $param ) = @_; - $self->calc_currency_option('setup_fee', $cust_pkg, $sdate, $details, $param); + $self->calc_currency_option('setup_fee', $cust_pkg, $time, $details, $param); } sub calc_setup { - my($self, $cust_pkg, $sdate, $details, $param) = @_; + my($self, $cust_pkg, $time, $details, $param) = @_; - return 0 if $self->prorate_setup($cust_pkg, $sdate); + return 0 if $self->prorate_setup($cust_pkg, $time); - $self->base_setup($cust_pkg, $sdate, $details, $param); + $self->base_setup($cust_pkg, $time, $details, $param); } use FS::Conf; sub calc_currency_option { - my($self, $optionname, $cust_or_quotation_pkg, $sdate, $details, $param) = @_; + my($self, $optionname, $cust_or_quotation_pkg, $time, $details, $param) = @_; my($currency, $amount) = $cust_or_quotation_pkg->part_pkg_currency_option($optionname); |