Change 20508 by [EMAIL PROTECTED] on 2003/08/05 18:36:38
Continue #20506.
Affected files ...
... //depot/perl/lib/ExtUtils/MM_Unix.pm#185 edit
Differences ...
==== //depot/perl/lib/ExtUtils/MM_Unix.pm#185 (text) ====
Index: perl/lib/ExtUtils/MM_Unix.pm
--- perl/lib/ExtUtils/MM_Unix.pm#184~20506~ Tue Aug 5 10:58:01 2003
+++ perl/lib/ExtUtils/MM_Unix.pm Tue Aug 5 11:36:38 2003
@@ -3111,10 +3111,9 @@
$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\"";
End of Patch.