[freeside-commits] freeside/FS/FS svc_Common.pm,1.39.2.1,1.39.2.2

Kristian Hoffmann,420,, khoff at wavetail.420.am
Fri May 11 12:51:13 PDT 2007


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

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	svc_Common.pm 
Log Message:
Quiet "Use of uninitialized value in string eq".  (Backport)


Index: svc_Common.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_Common.pm,v
retrieving revision 1.39.2.1
retrieving revision 1.39.2.2
diff -u -d -r1.39.2.1 -r1.39.2.2
--- svc_Common.pm	11 Apr 2007 04:29:48 -0000	1.39.2.1
+++ svc_Common.pm	11 May 2007 19:51:11 -0000	1.39.2.2
@@ -128,7 +128,7 @@
     my %flags = map { $_->columnname, $_->columnflag } (
         qsearch ('part_svc_column', { svcpart => $svcpart } )
       );
-    return grep { not ($flags{$_} eq 'X') } @vfields;
+    return grep { not ( defined($flags{$_}) && $flags{$_} eq 'X') } @vfields;
   } else { # Case 3
     return @vfields;
   } 



More information about the freeside-commits mailing list