From 1651dd5ba4114128aa0b0718c944395cdc84f274 Mon Sep 17 00:00:00 2001 From: levinse Date: Mon, 20 Jun 2011 20:24:16 +0000 Subject: [PATCH] cdr/freeside_description_default.pm: parse destination correctly, RT13141 --- FS/FS/cdr/freeside_description_default.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/cdr/freeside_description_default.pm b/FS/FS/cdr/freeside_description_default.pm index bbac86fdc..e44f404b9 100644 --- a/FS/FS/cdr/freeside_description_default.pm +++ b/FS/FS/cdr/freeside_description_default.pm @@ -37,9 +37,9 @@ 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"); + $cdr->dst("$1$2$3"); }, 'description', # Destination (regionname) -- 2.11.0