Ticket #29048 Strip leading # from destinations

diff --git a/FS/FS/cdr/cx3.pm b/FS/FS/cdr/cx3.pm
index 7f1222e..07d8967 100644 (file)
--- a/FS/FS/cdr/cx3.pm
+++ b/FS/FS/cdr/cx3.pm
@@ -38,7 +38,10 @@ use Date::Parse;
        'accountcode',  # AccountCode
        skip(6),                
        'src',          # source
-       'dst',          # destination
+       sub { my ($cdr, $dst, $param) = @_;
+               $dst =~ s/#//;
+               $cdr->set('dst', $dst);
+       },              # destination
 
   ],
 );