X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_location.pm;h=b98ade157227c786b4ee28395465342c2fdac038;hb=d5fa12d1022afb592e80803971e90d18eac414e0;hp=a834859baad33d08943c10dc19f22e1959e1d4e1;hpb=1271e8451691de07d167402e93ebde8efd902c84;p=freeside.git diff --git a/FS/FS/cust_location.pm b/FS/FS/cust_location.pm index a834859ba..b98ade157 100644 --- a/FS/FS/cust_location.pm +++ b/FS/FS/cust_location.pm @@ -257,12 +257,12 @@ and replace methods. =cut -#some false laziness w/cust_main, but since it should eventually lose these -#fields anyway... sub check { my $self = shift; my $conf = new FS::Conf; + return '' if $self->disabled; # so that disabling locations never fails + my $error = $self->ut_numbern('locationnum') || $self->ut_foreign_keyn('prospectnum', 'prospect_main', 'prospectnum')