diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2017-06-14 11:00:23 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2017-06-14 11:00:23 -0700 |
| commit | 893c5330eed4d2d8691cbdf89886a374efff2f05 (patch) | |
| tree | 5f889d1213e68fce05a581b0757332651b0eb23e /FS | |
| parent | 2aecf34ff195b9c33126f483eb96299700ec5039 (diff) | |
fix error on changing customer when there isn't an implicit contact, RT#76405
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/cust_main.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index d11fdad48..f6c3ff78d 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -1520,8 +1520,10 @@ sub replace { custnum => $self->custnum, } ); - $implicit_contact->set($_, $i_cust_contact->$_) - foreach qw( classnum selfservice_access comment ); + if ( $i_cust_contact ) { + $implicit_contact->set($_, $i_cust_contact->$_) + foreach qw( classnum selfservice_access comment ); + } my $error; if ( $implicit_contact->contactnum ) { |