From 4df3cb3192930c482c07c8d8e077a736244d4fc6 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Thu, 13 Nov 2014 14:37:20 -0800
Subject: [PATCH] status labels

---
 FS/FS/cust_main_Mixin.pm | 1 +
 1 file changed, 1 insertion(+)

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(@_) ) 
-- 
2.11.0