Re: [ID 20010608.010] File::Find re-entrancy

Message-ID: <m3hexikmjk.fsf@ak-71.mind.de>

Record the grim history.

p4raw-id: //depot/perl@10608

diff --git a/lib/File/Find.pm b/lib/File/Find.pm
index 274c7b8..d28c2f9 100644 (file)
--- a/lib/File/Find.pm
+++ b/lib/File/Find.pm
@@ -2,7 +2,7 @@ package File::Find;
 use strict;
 use warnings;
 use 5.6.0;
-our $VERSION = '1.00';
+our $VERSION = '1.01';
 require Exporter;
 require Cwd;
 
@@ -268,6 +268,12 @@ volume actually maintains its own "Desktop Folder" directory.
 
 =back
 
+=head1 HISTORY
+
+File::Find used to produce incorrect results if called recursively.
+During the development of perl 5.8 this bug was fixed.
+The first fixed version of File::Find was 1.01.
+
 =cut
 
 our @ISA = qw(Exporter);