X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_contact.pm;h=118a9e0008cd750780c02e6c2301ebd822285e73;hb=f975ff916152bf85b76e5c7bea48f7fdc8af1cc2;hp=6f899d83f8cedcd832f7d4e8776f379c78219105;hpb=167dbdad01e2c1b62fd9be43cc05212e8c874a02;p=freeside.git

diff --git a/FS/FS/cust_contact.pm b/FS/FS/cust_contact.pm
index 6f899d83f..118a9e000 100644
--- a/FS/FS/cust_contact.pm
+++ b/FS/FS/cust_contact.pm
@@ -55,6 +55,10 @@ comment
 
 empty or Y
 
+=item invoice_dest
+
+'Y' if the customer should get invoices sent to this address, null if not
+
 =back
 
 =head1 METHODS
@@ -102,7 +106,7 @@ and replace methods.
 sub check {
   my $self = shift;
 
-  if ( $self->selfservice_access eq 'R' ) {
+  if ( $self->selfservice_access eq 'R' || $self->selfservice_access eq 'E' || $self->selfservice_access eq 'P') {
     $self->selfservice_access('Y');
     $self->_resend('Y');
   }
@@ -114,6 +118,7 @@ sub check {
     || $self->ut_numbern('classnum')
     || $self->ut_textn('comment')
     || $self->ut_enum('selfservice_access', [ '', 'Y' ])
+    || $self->ut_flag('invoice_dest')
   ;
   return $error if $error;