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

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 {