Strip white space from numbers

1 files changed, 10 insertions, 2 deletions

diff --git a/FS/FS/cdr/ispphone.pm b/FS/FS/cdr/ispphone.pm
index 2817d53c1..c2ba1862d 100644
--- a/FS/FS/cdr/ispphone.pm
+++ b/FS/FS/cdr/ispphone.pm
@@ -15,8 +15,16 @@ use Date::Parse;
   'import_fields' => [
 
                  'accountcode',  # Accountcode
-	                 'src',	 # Form
-		         'dst',  # To
+	                sub { my ($cdr, $src) = @_;
+				$src =~ s/^\s+//;
+                                $cdr->set('src', $src);
+
+                        },       # Form
+		        sub { my ($cdr, $dst) = @_;
+                                $dst =~ s/^\s+//;
+                                $cdr->set('dst', $dst);
+
+                        },       # To
 		       skip(1),  # Country
      'upstream_dst_regionname',  # Description
 _cdr_date_parser_maker('startdate'),  #DateTime