X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Flocal%2Flib.pm;h=2e477e66465043896e0a0ceb01f7dadac9d8ba0a;hb=1cd322bb6bfa4218fc286b356ee72a83ac8e18e1;hp=80ac61890e72f8e335dd266caf0a4f39dd86be3b;hpb=25398da1338e8411723450755a7e1944f6e262c1;p=p5sagit%2Flocal-lib.git diff --git a/lib/local/lib.pm b/lib/local/lib.pm index 80ac618..2e477e6 100644 --- a/lib/local/lib.pm +++ b/lib/local/lib.pm @@ -10,7 +10,7 @@ use File::Spec (); use File::Path (); use Config; -our $VERSION = '1.008009'; # 1.8.9 +our $VERSION = '1.008011'; # 1.8.11 our @KNOWN_FLAGS = qw(--self-contained --deactivate --deactivate-all); @@ -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 { $_ } @@ -1024,6 +1024,14 @@ On Win32 systems, C is also examined. =back +=head1 SEE ALSO + +=over 4 + +=item * L + +=back + =head1 SUPPORT IRC: