diff options
author | ivan <ivan> | 2007-05-30 03:38:18 +0000 |
---|---|---|
committer | ivan <ivan> | 2007-05-30 03:38:18 +0000 |
commit | e6e7d4cd9723e82b0708394d0da097f5ec14c844 (patch) | |
tree | 24b619e8b157c62a38b2e0d0117dccb3dc354190 | |
parent | 28d4439d08924f220872ec795343fcb36d7d3299 (diff) |
should eliminiate error: Use of uninitialized value in string eq at /usr/local/share/perl/5.8.8/FS/svc_external.pm line 82.
-rw-r--r-- | FS/FS/svc_external.pm | 4 |
1 files changed, 3 insertions, 1 deletions
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 { |