X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcontact.pm;h=e004cf8eba626ece24f36aa4dda86b1280d0238f;hb=43c24ae41069a9b5bbbbb508263687869f1cefd3;hp=7e474f186ec25b3b45e6e95ab938ca960aa18477;hpb=9ae64522cb55ec039fa75a7c27416480e392f395;p=freeside.git

diff --git a/FS/FS/contact.pm b/FS/FS/contact.pm
index 7e474f186..e004cf8eb 100644
--- a/FS/FS/contact.pm
+++ b/FS/FS/contact.pm
@@ -283,8 +283,11 @@ sub replace {
              );
     my $contact_phone = qsearchs('contact_phone', \%cp);
 
-    # if new value is empty, delete old entry
-    if (!$self->get($pf)) {
+    my $pv = $self->get($pf);
+	$pv =~ s/\s//g;
+
+    #if new value is empty, delete old entry
+    if (!$pv) {
       if ($contact_phone) {
         $error = $contact_phone->delete;
         if ( $error ) {
@@ -297,7 +300,7 @@ sub replace {
 
     $contact_phone ||= new FS::contact_phone \%cp;
 
-    my %cpd = _parse_phonestring( $self->get($pf) );
+    my %cpd = _parse_phonestring( $pv );
     $contact_phone->set( $_ => $cpd{$_} ) foreach keys %cpd;
 
     my $method = $contact_phone->contactphonenum ? 'replace' : 'insert';