diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-08-16 19:54:43 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-08-16 19:54:43 +0000 |
| commit | 46ba315504111fc499d30433580e2435f4bb5639 (patch) | |
| tree | f1d1eaf88bacfd3630b0537f37d49d4f7d785f68 /lib/Cwd.pm | |
| parent | 973655a88ba1f882d9a8d56f00354b4569cbad10 (diff) | |
| download | perl-46ba315504111fc499d30433580e2435f4bb5639.tar.gz | |
Avoid a "Subroutine Cwd::fastcwd redefined" warning when
loading Cwd. Undefing &Cwd::fastcwd beforehand is inconvenient
because loading the XS part of Cwd might fail.
p4raw-id: //depot/perl@20736
Diffstat (limited to 'lib/Cwd.pm')
| -rw-r--r-- | lib/Cwd.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Cwd.pm b/lib/Cwd.pm index 2b5f85eed8..305cc60018 100644 --- 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'); }; |