diff options
author | Jonathan Prykop <jonathan@freeside.biz> | 2015-02-05 17:05:03 -0600 |
---|---|---|
committer | Jonathan Prykop <jonathan@freeside.biz> | 2015-02-05 17:05:03 -0600 |
commit | 795a733714d398d4a3d427de1448b7daaf92399d (patch) | |
tree | 861d252793ae5710b0195209683fec7bb2c8379d /FS/FS | |
parent | f4def30fba7da2daed58df35b80ffce0e9d0c776 (diff) |
RT#30248: Unable to remove phone number from contact (added whitespace stripping
Diffstat (limited to 'FS/FS')
-rw-r--r-- | FS/FS/contact.pm | 7 |
1 files 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'; |