From: Graham Knop <haarg@haarg.org>
Date: Wed, 20 Nov 2013 04:10:14 +0000 (-0500)
Subject: fix uninit warnings
X-Git-Tag: v2.000_000~34
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2Flocal-lib.git;a=commitdiff_plain;h=b01292d64375db099a596cb0e65931e932de7889

fix uninit warnings
---

diff --git a/lib/local/lib.pm b/lib/local/lib.pm
index f5e4778..80f56ad 100644
--- a/lib/local/lib.pm
+++ b/lib/local/lib.pm
@@ -314,7 +314,8 @@ sub environment_vars_string_for {
       next;
     }
     if (!ref $value
-        && $value eq $ENV{$name}) {
+        && defined $value ? $value eq $ENV{$name} : !defined $ENV{$name}
+    ) {
       next;
     }
     $out .= $self->$build_method($name, $value);