summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2011-02-05 06:51:51 +0000
committerivan <ivan>2011-02-05 06:51:51 +0000
commit396149500e90325c72b2bf27ca4c83eb51cbf913 (patch)
treebd7bdc6a10f69728a1b310673816655692b61eaf
parent053afcc049b1ef0adbf71f90980d762738507b7f (diff)
avoid needlessly warning about old prorate packages without a cutoff_day on 2.1
-rw-r--r--FS/FS/part_pkg/prorate.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/part_pkg/prorate.pm b/FS/FS/part_pkg/prorate.pm
index 367f15275..55b14d841 100644
--- a/FS/FS/part_pkg/prorate.pm
+++ b/FS/FS/part_pkg/prorate.pm
@@ -36,7 +36,7 @@ use FS::part_pkg::flat;
sub calc_recur {
my $self = shift;
- my $cutoff_day = $self->option('cutoff_day') || 1;
+ my $cutoff_day = $self->option('cutoff_day', 1) || 1;
return $self->calc_prorate(@_, $cutoff_day) - $self->calc_discount(@_);
}