From 89f1173614319de0a6ad1625a066574be67c06a9 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Wed, 10 Oct 2018 15:14:59 -0700 Subject: [PATCH] Import Freeside format CDRs with * in number, RT#81404 --- FS/FS/cdr/freeside_description_default.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/FS/FS/cdr/freeside_description_default.pm b/FS/FS/cdr/freeside_description_default.pm index 679a03229..fd91530ef 100644 --- a/FS/FS/cdr/freeside_description_default.pm +++ b/FS/FS/cdr/freeside_description_default.pm @@ -38,7 +38,7 @@ use FS::cdr; # Number sub { my($cdr, $number) = @_; - $number =~ /(\+|)(\d+)\s(\d+)$/ + $number =~ /(\+|)(\d+)\s([\d\*]+)$/ or die "unparsable number: $number"; #maybe we shouldn't die... $cdr->dst("$1$2$3"); }, -- 2.11.0