diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-11-23 16:52:40 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-11-23 16:52:40 +0000 |
| commit | dfc18e8ad09e7e2177a68bca5100ec871c744055 (patch) | |
| tree | 017114156729bc52611c48f726e9a7bf003a0bdc /lib | |
| parent | 6e26cd357084998649c8fbd38bdc230396a5f168 (diff) | |
| download | perl-dfc18e8ad09e7e2177a68bca5100ec871c744055.tar.gz | |
Reach back one higher up when searching for PERL_SRC.
p4raw-id: //depot/perl@7838
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/ExtUtils/MM_Unix.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm index 31aa1220ff..1808e3e029 100644 --- a/lib/ExtUtils/MM_Unix.pm +++ b/lib/ExtUtils/MM_Unix.pm @@ -1658,7 +1658,7 @@ sub init_main { unless ($self->{PERL_SRC}){ my($dir); - foreach $dir ($self->updir(),$self->catdir($self->updir(),$self->updir()),$self->catdir($self->updir(),$self->updir(),$self->updir())){ + foreach $dir ($self->updir(),$self->catdir($self->updir(),$self->updir()),$self->catdir($self->updir(),$self->updir(),$self->updir()),$self->catdir($self->updir(),$self->updir(),$self->updir(),$self->updir())){ if ( -f $self->catfile($dir,"config.sh") && |