Test::Harness uses $ENV{HARNESS_PERL_SWITCHES} when running perl;
[p5sagit/p5-mst-13.2.git] / lib / ExtUtils / MM_Win32.pm
index 534f26d..e08c679 100644 (file)
@@ -388,7 +388,6 @@ PM_TO_BLIB = }.join(" \\\n\t", %{$self->{PM}}).q{
 
 
 sub path {
-    local $^W = 1;
     my($self) = @_;
     my $path = $ENV{'PATH'} || $ENV{'Path'} || $ENV{'path'};
     my @path = split(';',$path);