Avoid a "Subroutine Cwd::fastcwd redefined" warning when

[p5sagit/p5-mst-13.2.git] / lib / Cwd.pm

diff --git a/lib/Cwd.pm b/lib/Cwd.pm
index 2b5f85e..305cc60 100644 (file)
--- a/lib/Cwd.pm
+++ b/lib/Cwd.pm
@@ -167,7 +167,7 @@ if ($^O eq 'os2' && defined &sys_cwd && defined &sys_abspath) {
 
 eval {
     require XSLoader;
-    no warnings 'redefine';
+    local $^W = 0;
     XSLoader::load('Cwd');
 };