From d2eeb4a5d310fe5eb1b16ada10b57e01511122f9 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Sun, 3 Feb 2013 19:45:05 -0800 Subject: add location to credit application detail, RT#21054 --- FS/FS/cust_location.pm | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'FS/FS/cust_location.pm') diff --git a/FS/FS/cust_location.pm b/FS/FS/cust_location.pm index b86529b..b25163f 100644 --- a/FS/FS/cust_location.pm +++ b/FS/FS/cust_location.pm @@ -479,6 +479,20 @@ sub location_label { $prefix . $self->SUPER::location_label(%opt); } +=item county_state_county + +Returns a string consisting of just the county, state and country. + +=cut + +sub county_state_country { + my $self = shift; + my $label = $self->country; + $label = $self->state.", $label" if $self->state; + $label = $self->county." County, $label" if $self->county; + $label; +} + =back =head1 CLASS METHODS -- cgit v1.1