diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-13 21:29:15 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-13 21:29:15 +0000 |
| commit | 9f1b1f2d9ab55954ee07a14c4ab04bd3dd1f99d5 (patch) | |
| tree | f3e99c675e49f21e2edc6600cd4c0b10b14c41d5 /ext/File | |
| parent | 828c4421567f1da54062ec5edfcc3250be409b16 (diff) | |
| download | perl-9f1b1f2d9ab55954ee07a14c4ab04bd3dd1f99d5.tar.gz | |
lexical warnings update for docs and tests (from Paul Marquess)
p4raw-id: //depot/perl@5712
Diffstat (limited to 'ext/File')
| -rw-r--r-- | ext/File/Glob/Glob.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/File/Glob/Glob.pm b/ext/File/Glob/Glob.pm index 0e1382b168..4b7e54b9e3 100644 --- a/ext/File/Glob/Glob.pm +++ b/ext/File/Glob/Glob.pm @@ -60,7 +60,7 @@ sub import { $DEFAULT_FLAGS &= ~GLOB_NOCASE() if $1 eq 'case'; $DEFAULT_FLAGS |= GLOB_NOCASE() if $1 eq 'nocase'; if ($1 eq 'globally') { - local $^W; + no warnings; *CORE::GLOBAL::glob = \&File::Glob::csh_glob; } next; |