fix uninit warnings
Graham Knop [Wed, 20 Nov 2013 04:10:14 +0000 (23:10 -0500)]
lib/local/lib.pm

index f5e4778..80f56ad 100644 (file)
@@ -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);