This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
noise from make in ext/SDBM
authorRobin Barker <RMBarker@cpan.org>
Thu, 6 Sep 2001 19:36:49 +0000 (20:36 +0100)
committerJarkko Hietaniemi <jhi@iki.fi>
Fri, 7 Sep 2001 01:49:36 +0000 (01:49 +0000)
Message-Id: <200109061836.TAA08747@tempest.npl.co.uk>

p4raw-id: //depot/perl@11923

lib/ExtUtils/MakeMaker.pm

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