diff options
| -rw-r--r-- | FS/FS/part_pkg/voip_cdr.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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 |