From: ivan Date: Mon, 28 Jun 2010 22:40:34 +0000 (+0000) Subject: fix for new svc_pbx.title CDR matching, thanks jeff, RT#8084 X-Git-Tag: root_of_svc_elec_features~109 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=a832705d5aa5ff8d148be4f84faf4faf656d4000 fix for new svc_pbx.title CDR matching, thanks jeff, RT#8084 --- diff --git a/FS/FS/part_pkg/voip_cdr.pm b/FS/FS/part_pkg/voip_cdr.pm index 614ea8266..9e21ba243 100644 --- a/FS/FS/part_pkg/voip_cdr.pm +++ b/FS/FS/part_pkg/voip_cdr.pm @@ -325,7 +325,7 @@ sub calc_usage { die $@ if $@; my $csv = new Text::CSV_XS; - my($svc_table, $svc_field) = split('.', $cdr_svc_method); + my($svc_table, $svc_field) = split('\.', $cdr_svc_method); foreach my $cust_svc ( grep { $_->part_svc->svcdb eq $svc_table } $cust_pkg->cust_svc