projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
'require' not 'use' Fax::Hylafax::Client so it's an optional requirement.
[freeside.git]
/
FS
/
FS
/
part_pkg.pm
diff --git
a/FS/FS/part_pkg.pm
b/FS/FS/part_pkg.pm
index
63cf00f
..
ad0bdb4
100644
(file)
--- a/
FS/FS/part_pkg.pm
+++ b/
FS/FS/part_pkg.pm
@@
-190,7
+190,7
@@
sub insert {
} elsif ( $options{'options'} ) {
warn " inserting part_pkg_option records for options hashref" if $DEBUG;
} elsif ( $options{'options'} ) {
warn " inserting part_pkg_option records for options hashref" if $DEBUG;
- foreach my $optionname ( %{$options{'options'}} ) {
+ foreach my $optionname (
keys
%{$options{'options'}} ) {
my $part_pkg_option =
new FS::part_pkg_option {
my $part_pkg_option =
new FS::part_pkg_option {
@@
-538,6
+538,10
@@
tie %freq, 'Tie::IxHash',
'6' => 'semiannually (every 6 months)',
'12' => 'annually',
'24' => 'biannually (every 2 years)',
'6' => 'semiannually (every 6 months)',
'12' => 'annually',
'24' => 'biannually (every 2 years)',
+ '36' => 'triannually (every 3 years)',
+ '48' => '(every 4 years)',
+ '60' => '(every 5 years)',
+ '120' => '(every 10 years)',
;
sub freq_pretty {
;
sub freq_pretty {
@@
-672,6
+676,11
@@
sub _calc_eval {
$value;
}
$value;
}
+#fallback that return 0 for old legacy packages with no plan
+
+sub calc_remain { 0; }
+sub calc_cancel { 0; }
+
=back
=head1 SUBROUTINES
=back
=head1 SUBROUTINES