From: David Golden <dagolden@cpan.org>
Date: Tue, 21 May 2013 14:02:07 +0000 (-0400)
Subject: Fix a split on undefined value warning
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e29bef6c485ef97355aaf470a8d3ca628e5e4114;hp=c923568a8740b02e5b88ddab528da93cfd29a02d;p=p5sagit%2Flocal-lib.git

Fix a split on undefined value warning

Something that perlbrew is doing seems to tickle this bug.
---

diff --git a/lib/local/lib.pm b/lib/local/lib.pm
index d56254a..02c2644 100644
--- a/lib/local/lib.pm
+++ b/lib/local/lib.pm
@@ -405,7 +405,7 @@ sub _env_list_value {
                  && (!$options{exists} || -e $_))
     } map {
       if (ref $_ eq 'SCALAR' && $options{interpolate} == INTERPOLATE_ENV) {
-        exists $ENV{${$_}} ? (split /\Q$Config{path_sep}/, $ENV{${$_}}) : ()
+        defined $ENV{${$_}} ? (split /\Q$Config{path_sep}/, $ENV{${$_}}) : ()
       } else {
         $_
       }