diff options
| -rw-r--r-- | FS/FS/ClientAPI/MyAccount/contact.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/ClientAPI/MyAccount/contact.pm b/FS/FS/ClientAPI/MyAccount/contact.pm index 31bbb0cb1..ff29079c7 100644 --- a/FS/FS/ClientAPI/MyAccount/contact.pm +++ b/FS/FS/ClientAPI/MyAccount/contact.pm @@ -141,7 +141,7 @@ sub delete_contact { my $error = $cust_contact->delete; return { 'error' => $error } if $error; - unless ( $contact->cust_contact ) { + unless ( $contact->cust_contact || $contact->prospect_contact ) { $contact->delete; } |