X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcontact.pm;h=38b7fd7b72c5d56572ff125ec2c1e676bafbc03a;hb=292ef074d01bb925e9a466ed771bf2ac418bb44f;hp=89bfb745b3c4cb48dac5bcd403bdea162b54cdcd;hpb=ec7e8155fce544f19f2b6734476ed6db8c200aa9;p=freeside.git

diff --git a/FS/FS/contact.pm b/FS/FS/contact.pm
index 89bfb745b..38b7fd7b7 100644
--- a/FS/FS/contact.pm
+++ b/FS/FS/contact.pm
@@ -259,7 +259,10 @@ sub insert {
   }
 
   if (      $link_hash{'selfservice_access'} eq 'R'
-       or ( $link_hash{'selfservice_access'} && $cust_contact )
+       or ( $link_hash{'selfservice_access'}
+            && $cust_contact
+            && ! length($self->_password)
+          )
      )
   {
     my $error = $self->send_reset_email( queue=>1 );