diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-05 18:36:38 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-05 18:36:38 +0000 |
| commit | ea2acc8682353256398868b4c41f36eca84f4af4 (patch) | |
| tree | 1c420add14368e3ab9bc4594a18da791f17fd6a6 /lib | |
| parent | 5af649b6ecc517fa8d0eed56feda360d766a805d (diff) | |
| download | perl-ea2acc8682353256398868b4c41f36eca84f4af4.tar.gz | |
Continue #20506.
p4raw-id: //depot/perl@20508
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/ExtUtils/MM_Unix.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm index f5a7ffd8ef..423c3e9d05 100644 --- a/lib/ExtUtils/MM_Unix.pm +++ b/lib/ExtUtils/MM_Unix.pm @@ -3111,10 +3111,9 @@ sub pasthru { $sep .= "\\\n\t"; foreach $key (qw(LIB LIBPERL_A LINKTYPE PREFIX OPTIMIZE INC DEFINE)) { - if ($key eq 'INC') { + if ($key eq 'INC' && defined(my $inc = $self->{INC})) { # For INC we need to prepend parent directory but # only iff the parent directory is not absolute. - my $inc = $self->{INC}; my ($o, $i) = $Is_VMS ? ('/Include=', 'i') : ('-I', ''); $inc =~ s!(?$i)$o(.+?)!$o.($self->file_name_is_absolute($1)?$1:$self->catdir($self->updir,$1))!eg; push @pasthru, "INC=\"$inc\""; |