Change 34035 by [EMAIL PROTECTED] on 2008/06/08 22:20:43
Integrate:
[ 34034]
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.8/perl/lib/DirHandle.pm#3 integrate
Differences ...
==== //depot/maint-5.8/perl/lib/DirHandle.pm#3 (text) ====
Index: perl/lib/DirHandle.pm
--- perl/lib/DirHandle.pm#2~29799~ 2007-01-13 15:25:00.000000000 -0800
+++ perl/lib/DirHandle.pm 2008-06-08 15:20:43.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.