From a85af077429e952fee988d4fbff702eca28546d1 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Andreas=20K=C3=B6nig?= <a.koenig@mind.de>
Date: Fri, 15 Jun 2001 15:30:39 +0200
Subject: [PATCH] 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
---
 lib/File/Find.pm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lib/File/Find.pm b/lib/File/Find.pm
index 274c7b8..d28c2f9 100644
--- 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);
-- 
2.7.4