X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FConfig-Any.git;a=blobdiff_plain;f=lib%2FConfig%2FAny.pm;h=d1a3b0e3afeb4da43be0b6b97ebd9c7fc608b5e0;hp=1f172bc6c546deafc3f7aa92fe7489952ba4eb8f;hb=refs%2Ftags%2Fv0.09_01;hpb=c84f1613b60ec2bd2df1a88e6618f36246c24c4b

diff --git a/lib/Config/Any.pm b/lib/Config/Any.pm
index 1f172bc..d1a3b0e 100644
--- a/lib/Config/Any.pm
+++ b/lib/Config/Any.pm
@@ -14,7 +14,7 @@ Config::Any - Load configuration from different file formats, transparently
 
 =head1 VERSION
 
-This document describes Config::Any version 0.09
+This document describes Config::Any version 0.09_01
 
 =head1 SYNOPSIS
 
@@ -141,8 +141,7 @@ sub _load {
     }
 
     # figure out what plugins we're using
-    my @plugins = grep { $_->is_supported }
-        ( $force ? @{ $args->{ force_plugins } } : $class->plugins );
+    my @plugins = $force ? @{ $args->{ force_plugins } } : $class->plugins;
 
     # map extensions if we have to
     my ( %extension_lut, $extension_re );
@@ -179,6 +178,7 @@ sub _load {
         }
 
         for my $loader ( @try_plugins ) {
+            next unless $loader->is_supported;
             my @configs
                 = eval { $loader->load( $filename, $loader_args{ $loader } ); };