diff options
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tlperl/lib/File/Find.pm')
| -rw-r--r-- | systems/texlive/tlnet/tlpkg/tlperl/lib/File/Find.pm | 24 |
1 files changed, 10 insertions, 14 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/lib/File/Find.pm b/systems/texlive/tlnet/tlpkg/tlperl/lib/File/Find.pm index 4c67e882a5..5f5f1468e7 100644 --- a/systems/texlive/tlnet/tlpkg/tlperl/lib/File/Find.pm +++ b/systems/texlive/tlnet/tlpkg/tlperl/lib/File/Find.pm @@ -3,7 +3,7 @@ use 5.006; use strict; use warnings; use warnings::register; -our $VERSION = '1.37'; +our $VERSION = '1.39'; require Exporter; require Cwd; @@ -161,9 +161,8 @@ sub _find_opt { $pre_process = $wanted->{preprocess}; $post_process = $wanted->{postprocess}; $no_chdir = $wanted->{no_chdir}; - $full_check = $Is_Win32 ? 0 : $wanted->{follow}; - $follow = $Is_Win32 ? 0 : - $full_check || $wanted->{follow_fast}; + $full_check = $wanted->{follow}; + $follow = $full_check || $wanted->{follow_fast}; $follow_skip = $wanted->{follow_skip}; $untaint = $wanted->{untaint}; $untaint_pat = $wanted->{untaint_pattern}; @@ -840,6 +839,9 @@ where C<find()> works from the top of the tree down. =back +Despite the name of the C<finddepth()> function, both C<find()> and +C<finddepth()> perform a depth-first search of the directory hierarchy. + =head2 %options The first argument to C<find()> is either a code reference to your @@ -849,7 +851,7 @@ code reference is described in L</The wanted function> below. Here are the possible keys for the hash: -=over 3 +=over 4 =item C<wanted> @@ -893,7 +895,7 @@ This might be expensive both in space and time for a large directory tree. See L</follow_fast> and L</follow_skip> below. If either I<follow> or I<follow_fast> is in effect: -=over 6 +=over 4 =item * @@ -1080,9 +1082,9 @@ situations. You can disable these warnings by putting the statement in the appropriate scope. See L<warnings> for more info about lexical warnings. -=head1 CAVEAT +=head1 BUGS AND CAVEATS -=over 2 +=over 4 =item $dont_use_nlink @@ -1108,12 +1110,6 @@ in an unknown directory. =back -=head1 BUGS AND CAVEATS - -Despite the name of the C<finddepth()> function, both C<find()> and -C<finddepth()> perform a depth-first search of the directory -hierarchy. - =head1 HISTORY File::Find used to produce incorrect results if called recursively. |