diff options
| author | Vadim Konovalov <vkonovalov@lucent.com> | 2002-05-12 04:02:47 +0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-11 19:54:43 +0000 |
| commit | e2a02c1e735e4afbf3df91186f80982fdd43695e (patch) | |
| tree | 6368d85928cd4186d9df8ea4b82e31498cb98a62 /lib | |
| parent | a6bdc2eb98f4e9bd74b51ad84203021dea610d6b (diff) | |
| download | perl-e2a02c1e735e4afbf3df91186f80982fdd43695e.tar.gz | |
for WinCE cross-build, another one
Message-ID: <004101c1f926$d36ca230$035cc3d9@vad>
p4raw-id: //depot/perl@16548
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/ExtUtils/MM_Unix.pm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm index 4cd97da560..5903115918 100644 --- a/lib/ExtUtils/MM_Unix.pm +++ b/lib/ExtUtils/MM_Unix.pm @@ -1569,6 +1569,11 @@ sub init_main { $self->{PERL_ARCHLIB} = $self->{PERL_LIB}; $self->{PERL_INC} = ($Is_Win32) ? File::Spec->catdir($self->{PERL_LIB},"CORE") : $self->{PERL_SRC}; + if (exists $INC{'Cross.pm'}) { + $self->{PERL_ARCHLIB} = File::Spec->catdir("$self->{PERL_SRC}","xlib",$::Cross::platform); + $self->{PERL_INC} = File::Spec->catdir("$self->{PERL_SRC}","xlib",$::Cross::platform, $Is_Win32?("CORE"):()); + } + # catch a situation that has occurred a few times in the past: unless ( -s File::Spec->catfile($self->{PERL_SRC},'cflags') @@ -1819,6 +1824,9 @@ sub init_INST { unless ($self->{INST_LIB}){ if ($self->{PERL_CORE}) { $self->{INST_LIB} = $self->{INST_ARCHLIB} = $self->{PERL_LIB}; + if (exists $INC{'Cross.pm'}) { + $self->{INST_LIB} = $self->{INST_ARCHLIB} = File::Spec->catdir($self->{PERL_LIB},"..","xlib",$::Cross::platform); + } } else { $self->{INST_LIB} = File::Spec->catdir($Curdir,"blib","lib"); } |