X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Porting%2Fcheckcfgvar.pl;h=fc0f8c693b51a03d455ee7c3f58389598f4d3466;hb=696814337d4eac8d0663d5307d6e01964d1b2897;hp=84e0f0516ffe0f78f405033a8ce173b830909246;hpb=26d21fa180ea83e37f583b5ced04e38690654588;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/Porting/checkcfgvar.pl b/Porting/checkcfgvar.pl
index 84e0f05..fc0f8c6 100644
--- a/Porting/checkcfgvar.pl
+++ b/Porting/checkcfgvar.pl
@@ -87,8 +87,10 @@ for my $cfg (@CFG) {
     read_file($cfg,
 	      sub {
 		  return if /^\#/ || /^\s*$/;
-		  return if $cfg eq 'configure.com' &&
-			    ! /^\$\s+WC "(\w+)='(.*)'"$/;
+		  if ($cfg eq 'configure.com') {
+		      s/(\s*!.*|\s*)$//; # remove trailing comments or whitespace
+		      return if ! /^\$\s+WC "(\w+)='(.*)'"$/;
+		  }
 		  # foo='bar'
 		  # foo=bar
 		  # $foo='bar' # VOS 5.8.x specialty