This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Retract #11898 for now because it introduces
authorJarkko Hietaniemi <jhi@iki.fi>
Thu, 6 Sep 2001 03:38:22 +0000 (03:38 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Thu, 6 Sep 2001 03:38:22 +0000 (03:38 +0000)
a rather nasty depencency: when B is being built,
MakeMaker is used.  MakeMaker uses File::Find.
File::Find uses Cwd::getcwd()...which doesn't
exist yet.

p4raw-id: //depot/perl@11908

lib/File/Find.pm

index bfcbcfd..eb4b2de 100644 (file)
@@ -475,7 +475,7 @@ sub _find_opt {
        $pre_process, $post_process, $dangling_symlinks);
     local($dir, $name, $fullname, $prune);
 
-    my $cwd            = $wanted->{bydepth} ? Cwd::fastcwd() : Cwd::getcwd();
+    my $cwd            = $wanted->{bydepth} ? Cwd::fastcwd() : Cwd::cwd();
     my $cwd_untainted  = $cwd;
     my $check_t_cwd    = 1;
     $wanted_callback   = $wanted->{wanted};