Fix Win32 build after unusual breakage caused by #30327

(Boy, did that take some tracking down!)

p4raw-id: //depot/perl@30331

diff --git a/win32/config_h.PL b/win32/config_h.PL
index ad2c9a3..929ef5a 100644 (file)
--- a/win32/config_h.PL
+++ b/win32/config_h.PL
@@ -31,9 +31,9 @@ $patchlevel = qq["$patchlevel"];
 open(SH,"<$name") || die "Cannot open $name:$!";
 while (<SH>)
  {
-  last if /^sed/;
+  last if /^\s*sed/;
  }
-($term,$file,$pat) = /^sed\s+<<(\S+)\s+>(\S+)\s+(.*)$/;
+($term,$file,$pat) = /^\s*sed\s+<<(\S+)\s+>(\S+)\s+(.*)$/;
 
 $file =~ s/^\$(\w+)$/$opt{$1}/g;