From 795a733714d398d4a3d427de1448b7daaf92399d Mon Sep 17 00:00:00 2001
From: Jonathan Prykop <jonathan@freeside.biz>
Date: Thu, 5 Feb 2015 17:05:03 -0600
Subject: [PATCH] RT#30248: Unable to remove phone number from contact (added
 whitespace stripping

---
 FS/FS/contact.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/FS/FS/contact.pm b/FS/FS/contact.pm
index 589fc7c19..89bfb745b 100644
--- a/FS/FS/contact.pm
+++ b/FS/FS/contact.pm
@@ -452,8 +452,11 @@ sub replace {
              );
     my $contact_phone = qsearchs('contact_phone', \%cp);
 
+    my $pv = $self->get($pf);
+	$pv =~ s/\s//g;
+
     #if new value is empty, delete old entry
-    if (!$self->get($pf)) {
+    if (!$pv) {
       if ($contact_phone) {
         $error = $contact_phone->delete;
         if ( $error ) {
@@ -466,7 +469,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';
-- 
2.11.0