diff options
author | Reini Urban <rurban@x-ray.at> | 2011-02-26 13:55:41 +0100 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-02-26 10:15:23 -0800 |
commit | 542f72439b96cee2ffeb944ed4d6710d4396f529 (patch) | |
tree | de27dde523f7cca0ca14891c37fd08ce17b1baa6 /configpm | |
parent | 8f878375c44ca8966a9b6ee166fd9d10f631a68b (diff) | |
download | perl-542f72439b96cee2ffeb944ed4d6710d4396f529.tar.gz |
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
Diffstat (limited to 'configpm')
-rwxr-xr-x | configpm | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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"; |