X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FCTI.pm;h=3bc13860e67b1ce3ed2417460141954fd88b34e8;hb=refs%2Fheads%2Forder_controller;hp=8605ff163485d7fe1501d9b56121b04139bd4b9d;hpb=53d80f2a01439ee73cf679c53326ec8fb32ab1ed;p=kivitendo-erp.git

diff --git a/SL/CTI.pm b/SL/CTI.pm
index 8605ff163..3bc13860e 100644
--- a/SL/CTI.pm
+++ b/SL/CTI.pm
@@ -40,9 +40,10 @@ sub sanitize_number {
   my $idp              = $config->{international_dialing_prefix} // '00';
 
   my $number           = $params{number} // '';
-  $number              =~ s/[^0-9+\.-]//g;                                     # delete unsupported characters
+  $number              =~ s/[^0-9+]//g;                                        # delete unsupported characters
   my $countrycode      = $number =~ s/^(?: $idp | \+ ) ( \d{2} )//x ? $1 : ''; # TODO: countrycodes can have more or less than 2 digits
   $number              =~ s/^0//x if $countrycode;                             # kill non standard optional zero after global identifier
+  $number              =~ s{[^0-9]+}{}g;
 
   return '' unless $number;