From 542f72439b96cee2ffeb944ed4d6710d4396f529 Mon Sep 17 00:00:00 2001
From: Reini Urban <rurban@x-ray.at>
Date: Sat, 26 Feb 2011 13:55:41 +0100
Subject: [PATCH] Modern cygwin often has empty $ENV{CYGWIN}

Fixes Use of uninitialized value $ENV{"CYGWIN"} in concatenation (.) or string
at /usr/lib/perl5/5.13.10/i686-cygwin/Config_heavy.pl line 54
---
 configpm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/configpm b/configpm
index 3427f36..7d6de37 100755
--- a/configpm
+++ b/configpm
@@ -203,7 +203,7 @@ sub _V {
     print "  $date\n" if defined $date;
 
     my @env = map { "$_=\"$ENV{$_}\"" } sort grep {/^PERL/} keys %ENV;
-    push @env, "CYGWIN=\"$ENV{CYGWIN}\"" if $^O eq 'cygwin';
+    push @env, "CYGWIN=\"$ENV{CYGWIN}\"" if $^O eq 'cygwin' and $ENV{CYGWIN};
 
     if (@env) {
         print "  \%ENV:\n";
-- 
2.7.4