X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcdr%2Ffreeside_description_default.pm;h=679a032294d4e2e17717beb482ba3371be7c6477;hb=b35987f47a04e2875949ac95dcbb19ff49026e33;hp=97af73d779e15de692b000646470542f1fa03629;hpb=5ac0692bfeabd57bf930702f6d5f4b55da7be5a1;p=freeside.git diff --git a/FS/FS/cdr/freeside_description_default.pm b/FS/FS/cdr/freeside_description_default.pm index 97af73d77..679a03229 100644 --- a/FS/FS/cdr/freeside_description_default.pm +++ b/FS/FS/cdr/freeside_description_default.pm @@ -10,6 +10,7 @@ use FS::cdr; %info = ( 'name' => 'Freeside default with description field as destination', 'weight' => 25, + 'type' => 'csv', 'header' => 1, 'import_fields' => [ 'charged_party', # Billed number @@ -37,9 +38,9 @@ use FS::cdr; # Number sub { my($cdr, $number) = @_; - $number =~ /(\d+)$/ + $number =~ /(\+|)(\d+)\s(\d+)$/ or die "unparsable number: $number"; #maybe we shouldn't die... - $cdr->dst($1); + $cdr->dst("$1$2$3"); }, 'description', # Destination (regionname)