From 1551c7d41cea8bfa58ea1d3fb489cfb54823e5d8 Mon Sep 17 00:00:00 2001 From: ivan Date: Tue, 4 Oct 2011 01:03:58 +0000 Subject: [PATCH] add svc_dsl name to list_svcs output, RT#13656 --- FS/FS/ClientAPI/MyAccount.pm | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm index 32f9f5823..e5016d51e 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -1379,6 +1379,14 @@ sub list_svcs { # more... ); + } elsif ( $svcdb eq 'svc_dsl' ) { + if ( $svc_x->first || $svc_x->get('last') || $svc_x->company ) { + $hash{'name'} = $svc_x->first. ' '. $svc_x->get('last'); + $hash{'name'} = $svc_x->company. ' ('. $hash{'name'}. ')' + if $svc_x->company; + } else { + $hash{'name'} = $cust_main->name; + } } # elsif ( $svcdb eq 'svc_phone' || $svcdb eq 'svc_port' ) { # %hash = ( -- 2.11.0