[freeside-commits] freeside/FS/FS svc_external.pm,1.5,1.5.2.1

Ivan,,, ivan at wavetail.420.am
Tue May 29 20:38:24 PDT 2007


Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv10436

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	svc_external.pm 
Log Message:
should eliminiate error: Use of uninitialized value in string eq at /usr/local/share/perl/5.8.8/FS/svc_external.pm line 82.

Index: svc_external.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_external.pm,v
retrieving revision 1.5
retrieving revision 1.5.2.1
diff -u -d -r1.5 -r1.5.2.1
--- svc_external.pm	29 Dec 2006 08:51:32 -0000	1.5
+++ svc_external.pm	30 May 2007 03:38:18 -0000	1.5.2.1
@@ -79,7 +79,9 @@
 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 {



More information about the freeside-commits mailing list