From: Tim Bunce <Tim.Bunce@ig.co.uk>
Date: Mon, 24 Feb 1997 16:05:17 +0000 (+0000)
Subject: Trivial patch to make ExtUtils::Install more -w clean
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d6abf24bd347fe18bf5a72836211f1d5f86fed6e;p=p5sagit%2Fp5-mst-13.2.git

Trivial patch to make ExtUtils::Install more -w clean

p5p-msgid: <9702241605.AA17436@toad.ig.co.uk>
---

diff --git a/lib/ExtUtils/Install.pm b/lib/ExtUtils/Install.pm
index c7eb8b4..a88bd99 100644
--- a/lib/ExtUtils/Install.pm
+++ b/lib/ExtUtils/Install.pm
@@ -12,7 +12,7 @@ use vars qw(@ISA @EXPORT $VERSION);
 $Is_VMS = $^O eq 'VMS';
 
 my $splitchar = $^O eq 'VMS' ? '|' : $^O eq 'os2' ? ';' : ':';
-my @PERL_ENV_LIB = split $splitchar, defined $ENV{'PERL5LIB'} ? $ENV{'PERL5LIB'} : $ENV{'PERLLIB'};
+my @PERL_ENV_LIB = split $splitchar, defined $ENV{'PERL5LIB'} ? $ENV{'PERL5LIB'} : $ENV{'PERLLIB'} || '';
 my $Inc_uninstall_warn_handler;
 
 #use vars qw( @EXPORT @ISA $Is_VMS );