From: David Golden 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?p=p5sagit%2Flocal-lib.git;a=commitdiff_plain;h=373b3c185f31a26601281f5ac7e2be764426b9f2 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 { $_ }