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-Tag: 1.008010~4
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=373b3c185f31a26601281f5ac7e2be764426b9f2;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 80ac618..a1a3b5e 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 {
         $_
       }