diff options
| author | ivan <ivan> | 2009-03-31 19:47:35 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2009-03-31 19:47:35 +0000 |
| commit | 432ab2af40034d4f63f7771eff6207c73b057959 (patch) | |
| tree | 9a417a714c46f2a78c104554e62bd1b5d3907575 | |
| parent | 8d6784828998dc848eede30cef4a38bfd30fc3d1 (diff) | |
quiet warning: Argument "" isn't numeric in numeric eq (==) at /usr/local/share/perl/5.10.0/FS/part_pkg/voip_cdr.pm line 201
| -rw-r--r-- | FS/FS/part_pkg/voip_cdr.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/FS/FS/part_pkg/voip_cdr.pm b/FS/FS/part_pkg/voip_cdr.pm index a691fdad6..fe05b684a 100644 --- a/FS/FS/part_pkg/voip_cdr.pm +++ b/FS/FS/part_pkg/voip_cdr.pm @@ -199,7 +199,8 @@ sub calc_recur { my $last_bill = $cust_pkg->get('last_bill'); #->last_bill falls back to setup return 0 - if $self->option('recur_temporality', 1) eq 'preceding' && $last_bill == 0; + if $self->option('recur_temporality', 1) eq 'preceding' + && ( $last_bill eq '' || $last_bill == 0 ); my $ratenum = $cust_pkg->part_pkg->option('ratenum'); |