diff options
| -rw-r--r-- | ext/IO/lib/IO/Dir.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/IO/lib/IO/Dir.pm b/ext/IO/lib/IO/Dir.pm index fccd02c088..e8d5fab85a 100644 --- a/ext/IO/lib/IO/Dir.pm +++ b/ext/IO/lib/IO/Dir.pm @@ -38,6 +38,7 @@ sub new { sub DESTROY { my ($dh) = @_; + no warnings 'io'; closedir($dh); } |