From: ivan <ivan>
Date: Wed, 30 May 2007 03:38:17 +0000 (+0000)
Subject: should eliminiate error: Use of uninitialized value in string eq at /usr/local/share... 
X-Git-Tag: TRIXBOX_2_6~507
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=f1307c4b7dae3696ad7d344208f1bb98cb87a773

should eliminiate error: Use of uninitialized value in string eq at /usr/local/share/perl/5.8.8/FS/svc_external.pm line 82.
---

diff --git a/FS/FS/svc_external.pm b/FS/FS/svc_external.pm
index 5aaee4872..f4911aa63 100644
--- a/FS/FS/svc_external.pm
+++ b/FS/FS/svc_external.pm
@@ -79,7 +79,9 @@ sub table { 'svc_external'; }
 sub label {
   my $self = shift;
   my $conf = new FS::Conf;
-  if ( $conf->config('svc_external-display_type') eq 'artera_turbo' ) {
+  if (    $conf->exists('svc_external-display_type')
+       && $conf->config('svc_external-display_type') eq 'artera_turbo' )
+  {
     sprintf('%010d', $self->id). '-'.
       substr('0000000000'.uc($self->title), -10);
   } else {