Even better configure.com handling for checkcfgvar.pl

p4raw-id: //depot/perl@29370

diff --git a/Porting/checkcfgvar.pl b/Porting/checkcfgvar.pl
index 955120e..fc0f8c6 100644 (file)
--- a/Porting/checkcfgvar.pl
+++ b/Porting/checkcfgvar.pl
@@ -88,7 +88,7 @@ for my $cfg (@CFG) {
              sub {
                  return if /^\#/ || /^\s*$/;
                  if ($cfg eq 'configure.com') {
-                     s/\s*!.*$//; # remove trailing comments
+                     s/(\s*!.*|\s*)$//; # remove trailing comments or whitespace
                      return if ! /^\$\s+WC "(\w+)='(.*)'"$/;
                  }
                  # foo='bar'