X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Porting%2Fcheckcfgvar.pl;h=a757d6bfd8cc43904d61ddd2c73f96f71c3b6cd4;hb=115454352a978d4e8b08f627af1ad772bab2816b;hp=3531b3c490da214c6e63a856a35712d2e2feb78a;hpb=d73cfe96d5ae99d8122aa3bc548f336f44a6bae9;p=p5sagit%2Fp5-mst-13.2.git diff --git a/Porting/checkcfgvar.pl b/Porting/checkcfgvar.pl index 3531b3c..a757d6b 100644 --- a/Porting/checkcfgvar.pl +++ b/Porting/checkcfgvar.pl @@ -81,13 +81,13 @@ sub check_cfg { for my $cfg (@CFG) { unless (exists $MANIFEST{$cfg}) { - print "[skipping not-expected '$cfg']\n"; + print STDERR "[skipping not-expected '$cfg']\n"; next; } 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+)='(.*)'"$/;