removed useless use of grep in void context stuff, version bump

diff --git a/Changes b/Changes
index f895508..ea5295c 100755 (executable)
--- a/Changes
+++ b/Changes
@@ -1,4 +1,8 @@
 Revision history for Catalyst-Plugin-ConfigLoader-Environment
+0.07       05 June 2010
+        - removed useless use of grep in void context
+        - using shipit for dist management
+
 0.06       25 February 2010
         - official release
 
@@ -7,6 +11,7 @@ Revision history for Catalyst-Plugin-ConfigLoader-Environment
         - using MRO::Compat
         - updated 01-live.t to reflect such
         - Added self to contributors
+
 0.05    6 March 2008
         - Allow top-level ::-params (Model__Foo, not just Model__Foo_bar)
         - Allow JSON for all values (not just Model__Foo_bar)

diff --git a/lib/Catalyst/Plugin/ConfigLoader/Environment.pm b/lib/Catalyst/Plugin/ConfigLoader/Environment.pm
index d199f07..f5d65e0 100755 (executable)
--- a/lib/Catalyst/Plugin/ConfigLoader/Environment.pm
+++ b/lib/Catalyst/Plugin/ConfigLoader/Environment.pm
@@ -15,7 +15,7 @@ Version 0.05
 
 =cut
 
-our $VERSION = '0.06';
+our $VERSION = '0.07';
 
 =head1 SYNOPSIS
 
@@ -123,7 +123,9 @@ sub setup {
     my $c    = shift;
     my $prefix = Catalyst::Utils::class2env($c);
     my %env;
-    grep { /^${prefix}[_](.+)$/ && ($env{$1}=$ENV{$_})} keys %ENV;
+    for (keys %ENV) { 
+        m/^${prefix}[_](.+)$/ and $env{$1} = $ENV{$_}; 
+    }
 
     foreach my $var (keys %env) {
         my $val = $env{$var};