From: Steve Peters Date: Mon, 16 Jan 2006 22:31:52 +0000 (+0000) Subject: Don't warn about a directory being closed in the DESTROY for X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7692a1edf7c7e1676cdb76e2a016e73fa1a5a254;p=p5sagit%2Fp5-mst-13.2.git Don't warn about a directory being closed in the DESTROY for IO::Dir. p4raw-id: //depot/perl@26868 --- diff --git a/ext/IO/lib/IO/Dir.pm b/ext/IO/lib/IO/Dir.pm index fccd02c..e8d5fab 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); }