From: Ivan Kohler Date: Thu, 20 Dec 2012 20:06:15 +0000 (-0800) Subject: fix "Use of implicit split to @_ is deprecated" warning, RT#20731, RT#20706 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=96bb37b68d74110d2875e011baa955d7c55dc892;p=freeside.git fix "Use of implicit split to @_ is deprecated" warning, RT#20731, RT#20706 --- 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'}"