diff options
| -rw-r--r-- | FS/FS/cust_main_Mixin.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/FS/FS/cust_main_Mixin.pm b/FS/FS/cust_main_Mixin.pm index ded6cc697..bdad511fa 100644 --- a/FS/FS/cust_main_Mixin.pm +++ b/FS/FS/cust_main_Mixin.pm @@ -236,6 +236,7 @@ linked to a customer. sub ucfirst_cust_status { carp "ucfirst_cust_status deprecated, use cust_status_label"; + local($FS::cust_main::ucfirst_nowarn) = 1; my $self = shift; $self->cust_linked ? ucfirst( $self->cust_status(@_) ) |