From 643107150c328aabad90efd15678110606558405 Mon Sep 17 00:00:00 2001
From: Todd R <git@daemon.de>
Date: Fri, 15 Oct 2010 19:04:46 +0000
Subject: [PATCH] RT 58262 - fix warning messages from perl 5.12

git-svn-id: http://dev.catalyst.perl.org/repos/Config-General/trunk@90 be1acefe-a474-0410-9a34-9b3221f2030f
---
 General/Interpolated.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/General/Interpolated.pm b/General/Interpolated.pm
index e0d6f63..aaef6b7 100644
--- a/General/Interpolated.pm
+++ b/General/Interpolated.pm
@@ -124,7 +124,7 @@ sub _interpolate_hash {
   my ($this, $config) = @_;
 
   # bugfix rt.cpan.org#46184, moved code from _interpolate() to here.
-  if ($this->{InterPolateEnv} && defined(%ENV)) {
+  if ($this->{InterPolateEnv}) {
     # may lead to vulnerabilities, by default flag turned off
     for my $key (keys %ENV){
       $config->{__stack}->{$key}=$ENV{$key};