perlglob.exe needs to be found in Win32, patch from

Vadim Konovalov.  Nick I-S comments: "Perhaps a lingering glob()
which needs external glob at mini-perl time."

p4raw-id: //depot/perl@8943

diff --git a/ext/Encode/compile b/ext/Encode/compile
index f6957d2..a688c23 100755 (executable)
--- a/ext/Encode/compile
+++ b/ext/Encode/compile
@@ -1,5 +1,8 @@
 #!../../perl -w
-BEGIN { @INC = '../../lib' };
+BEGIN {
+    @INC = '../../lib';
+    $ENV{PATH} .= ';../..' if $^O eq 'MSWin32';
+}
 use strict;
 use Getopt::Std;
 my @orig_ARGV = @ARGV;