windows build fails if there is no perlglob.exe in the PATH

p4raw-id: //depot/perl@16160

diff --git a/win32/buildext.pl b/win32/buildext.pl
index b5fd4d4..a7cc19b 100644 (file)
--- a/win32/buildext.pl
+++ b/win32/buildext.pl
@@ -28,6 +28,9 @@ if ($perl =~ m#^\.\.#)
  {
   $perl = "$here\\$perl";
  }
+(my $topdir = $perl) =~ s/\\[^\\]+$//;
+$ENV{PATH} = "$topdir;$ENV{PATH}";     # so miniperl can find perlglob.exe
+#print "PATH=$ENV{PATH}\n";
 my $make = shift;
 $make .= " ".shift while $ARGV[0]=~/^-/;
 my $dep  = shift;