Change 34034 by [EMAIL PROTECTED] on 2008/06/08 21:59:37
Integrate:
[ 33989]
Subject: AW: IO::Dir destructor
From: "Dintelmann, Peter" <[EMAIL PROTECTED]>
Date: Mon, 2 Jun 2008 14:48:35 +0200
Message-ID: <[EMAIL PROTECTED]>
[ 33996]
Forgot to update version in DirHandle.pm after updating.
No cookie for me.
Affected files ...
... //depot/maint-5.10/perl/lib/DirHandle.pm#2 integrate
Differences ...
==== //depot/maint-5.10/perl/lib/DirHandle.pm#2 (text) ====
Index: perl/lib/DirHandle.pm
--- perl/lib/DirHandle.pm#1~32694~ 2007-12-22 01:23:09.000000000 -0800
+++ perl/lib/DirHandle.pm 2008-06-08 14:59:37.000000000 -0700
@@ -1,6 +1,6 @@
package DirHandle;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
=head1 NAME
@@ -60,6 +60,7 @@
my ($dh) = @_;
# Don't warn about already being closed as it may have been closed
# correctly, or maybe never opened at all.
+ local($., $@, $!, $^E, $?);
no warnings 'io';
closedir($dh);
}
End of Patch.
