Change 33048 by [EMAIL PROTECTED] on 2008/01/23 08:55:33

        Teach checkcfgvar.pl that : is also a comment character in shell scripts

Affected files ...

... //depot/perl/Porting/checkcfgvar.pl#12 edit

Differences ...

==== //depot/perl/Porting/checkcfgvar.pl#12 (text) ====
Index: perl/Porting/checkcfgvar.pl
--- perl/Porting/checkcfgvar.pl#11~33046~       2008-01-23 00:40:37.000000000 
-0800
+++ perl/Porting/checkcfgvar.pl 2008-01-23 00:55:33.000000000 -0800
@@ -87,7 +87,7 @@
     my %cfg;
     read_file($cfg,
              sub {
-                 return if /^\#/ || /^\s*$/;
+                 return if /^\#/ || /^\s*$/ || /^\:/;
                  if ($cfg eq 'configure.com') {
                      s/(\s*!.*|\s*)$//; # remove trailing comments or 
whitespace
                      return if ! /^\$\s+WC "(\w+)='(.*)'"$/;
End of Patch.

Reply via email to