status labels

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index b2949a5..f446b88 100644 (file)
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -4294,10 +4294,14 @@ sub ucfirst_cust_status {
 
 =item cust_status_label
 
+=item status_label
+
 Returns the display label for this status.
 
 =cut
 
+sub status_label { shift->cust_status_label(@_); }
+
 sub cust_status_label {
   my $self = shift;
   __PACKAGE__->statuslabels->{$self->cust_status};

diff --git a/httemplate/elements/select-cust_main-status.html b/httemplate/elements/select-cust_main-status.html
index bdbaac7..4885a0e 100644 (file)
--- a/httemplate/elements/select-cust_main-status.html
+++ b/httemplate/elements/select-cust_main-status.html
@@ -11,7 +11,7 @@
             <% ref($value) && $value->{$option} || $option eq $value
                ? 'SELECTED' : ''
             %>
-    ><% $option %>
+    ><% FS::cust_main->statuslabels->{$option} %>
 
 % }