This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Workaround on Cwd bootstrap problem.
authorJarkko Hietaniemi <jhi@iki.fi>
Tue, 24 Jul 2001 02:58:20 +0000 (02:58 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Tue, 24 Jul 2001 02:58:20 +0000 (02:58 +0000)
p4raw-id: //depot/perl@11464

lib/ExtUtils/MakeMaker.pm

index b36a542..7f6bf1a 100644 (file)
@@ -152,7 +152,7 @@ sub eval_in_subdirs {
     my($dir);
     use Cwd qw(cwd abs_path);
     my $pwd = cwd();
     my($dir);
     use Cwd qw(cwd abs_path);
     my $pwd = cwd();
-    local @INC = map abs_path($_), @INC;
+    local @INC = map eval {abs_path($_)} || $_, @INC;
 
     foreach $dir (@{$self->{DIR}}){
        my($abs) = $self->catdir($pwd,$dir);
 
     foreach $dir (@{$self->{DIR}}){
        my($abs) = $self->catdir($pwd,$dir);