X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FB%2FStash.t;h=d302d2e5a8d560739bfcc08b30dab13c5636527e;hb=5456cc46bd42ceffaad395dfff18bb25cee5b76c;hp=bc9d896927ffb1dfff960985ab49222feb964eff;hpb=b695f709e8a342e35e482b0437eb6cdacdc58b6b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/ext/B/Stash.t b/ext/B/Stash.t index bc9d896..d302d2e 100644 --- a/ext/B/Stash.t +++ b/ext/B/Stash.t @@ -28,7 +28,7 @@ my $redir = $Is_MacOS ? "" : "2>&1"; chomp($a = `$^X $path "-MB::Stash" "-Mwarnings" -e1`); $a = join ',', sort split /,/, $a; -$a =~ s/-u(PerlIO|open)(?:::\w+)?,//g if defined $Config{'useperlio'} and $Config{'useperlio'} eq 'define'; +$a =~ s/-u(PerlIO|open)(?:::\w+)?,//g; $a =~ s/-uWin32,// if $^O eq 'MSWin32'; $a =~ s/-uNetWare,// if $^O eq 'NetWare'; $a =~ s/-u(Cwd|File|File::Copy|OS2),//g if $^O eq 'os2';