summaryrefslogtreecommitdiff
path: root/FS/FS/part_pkg/agent.pm
diff options
context:
space:
mode:
authorivan <ivan>2009-08-05 23:34:28 +0000
committerivan <ivan>2009-08-05 23:34:28 +0000
commit94a66b78bcda5605d7ee5eb7c3e692fb2fe5cf2c (patch)
tree5ec443a3104c79e022edc33ff5da3a76b5064200 /FS/FS/part_pkg/agent.pm
parentd6107b6ae3fce55df974ac0a603443adb1d14ba7 (diff)
fix cancellation errors with updated flat_introrate, RT#5865
Diffstat (limited to 'FS/FS/part_pkg/agent.pm')
-rw-r--r--FS/FS/part_pkg/agent.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/part_pkg/agent.pm b/FS/FS/part_pkg/agent.pm
index 2ebaf58..d41978c 100644
--- a/FS/FS/part_pkg/agent.pm
+++ b/FS/FS/part_pkg/agent.pm
@@ -119,7 +119,7 @@ sub calc_recur {
my $pkg_setup_fee =
$part_pkg->setup_cost || $part_pkg->option('setup_fee');
my $pkg_base_recur =
- $part_pkg->recur_cost || $part_pkg->base_recur_permonth;
+ $part_pkg->recur_cost || $part_pkg->base_recur_permonth($cust_pkg);
my $pkg_start = $cust_pkg->get('setup');
if ( $pkg_start < $last_bill ) {