From: Jan Dubois <jand@activestate.com>
Date: Wed, 3 Jan 2007 08:48:22 +0000 (-0800)
Subject: Update change 29607 to affect only Win32
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c773137ed1d1b76e23d5e7a629fe138f442c94e4;p=p5sagit%2Fp5-mst-13.2.git

Update change 29607 to affect only Win32
Message-ID: <f9nnp2lf4hsb74jf9unlsj59ahsf4f1o1v@4ax.com>

p4raw-id: //depot/perl@29676
---

diff --git a/lib/blib.pm b/lib/blib.pm
index 8a39dc8..98f1612 100644
--- a/lib/blib.pm
+++ b/lib/blib.pm
@@ -47,7 +47,7 @@ sub import
 {
  my $package = shift;
  my $dir;
- if ($^O eq "MSWin32") {
+ if ($^O eq "MSWin32" && -f "Win32.xs") {
      # We don't use getcwd() on Windows because it will internally
      # call Win32::GetCwd(), which will get the Win32 module loaded.
      # That means that it would not be possible to run `make test`