projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
9b85a0b
)
clarify interface difference between calc_setup and calc_recur: calc_setup takes...
author
Ivan Kohler
<ivan@freeside.biz>
Fri, 26 Jul 2019 18:35:11 +0000
(11:35 -0700)
committer
Ivan Kohler
<ivan@freeside.biz>
Fri, 26 Jul 2019 18:35:11 +0000
(11:35 -0700)
FS/FS/part_pkg/flat_introrate.pm
patch
|
blob
|
history
diff --git
a/FS/FS/part_pkg/flat_introrate.pm
b/FS/FS/part_pkg/flat_introrate.pm
index
f12b1ac
..
4c9abeb
100644
(file)
--- a/
FS/FS/part_pkg/flat_introrate.pm
+++ b/
FS/FS/part_pkg/flat_introrate.pm
@@
-73,15
+73,15
@@
sub intro_end {
}
sub base_recur {
}
sub base_recur {
- my($self, $cust_pkg, $
tim
e ) = @_;
+ my($self, $cust_pkg, $
sdat
e ) = @_;
my $now;
my $now;
- if (!$
tim
e) { # the "$sdate" from _make_lines
+ if (!$
sdat
e) { # the "$sdate" from _make_lines
my $log = FS::Log->new('FS::part_pkg');
$log->warning("flat_introrate base_recur requires date!");
$now = time;
} else {
my $log = FS::Log->new('FS::part_pkg');
$log->warning("flat_introrate base_recur requires date!");
$now = time;
} else {
- $now = $$
tim
e;
+ $now = $$
sdat
e;
}
if ($now < $self->intro_end($cust_pkg)) {
}
if ($now < $self->intro_end($cust_pkg)) {