diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2012-12-20 12:06:15 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2012-12-20 12:06:15 -0800 |
| commit | 96bb37b68d74110d2875e011baa955d7c55dc892 (patch) | |
| tree | 6f19e666651c69cd3a0e4a7b2f9eac377e7f25a1 | |
| parent | dfb703365f0561bdf5ad01b677eca7a90cda52cf (diff) | |
fix "Use of implicit split to @_ is deprecated" warning, RT#20731, RT#20706
| -rw-r--r-- | FS/FS/part_pkg/voip_cdr.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/part_pkg/voip_cdr.pm b/FS/FS/part_pkg/voip_cdr.pm index cac58384c..73b0aedbe 100644 --- a/FS/FS/part_pkg/voip_cdr.pm +++ b/FS/FS/part_pkg/voip_cdr.pm @@ -925,8 +925,8 @@ sub check_chargable { return "carrierid NOT IN ( $opt{'use_carrierid'} )" if $opt{'use_carrierid'} =~ /\S/ - && !grep { $cdr->carrierid eq $_ } split(/\s*,\s*/, $opt{'use_carrierid'}) #eq otherwise 0 matches '' - && ! $flags{'da_rewrote'}; + && ! $flags{'da_rewrote'} #why? + && !grep { $cdr->carrierid eq $_ } split(/\s*,\s*/, $opt{'use_carrierid'}); #eq otherwise 0 matches '' # unlike everything else, use_cdrtypenum is applied in FS::svc_x::get_cdrs. return "cdrtypenum != $opt{'use_cdrtypenum'}" |