X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FConfig%2FAny.pm;h=bec4fc337686af1b9fb036c5b225982abc16ab2d;hb=86d4e2d646ca1e0592e33e6d5a439499dd387df5;hp=301e006e7887bdeb6ab779343155b6035fb0487d;hpb=06fb16e20c0124f9d71f2089e8c9a1ab9d44883b;p=p5sagit%2FConfig-Any.git diff --git a/lib/Config/Any.pm b/lib/Config/Any.pm index 301e006..bec4fc3 100644 --- a/lib/Config/Any.pm +++ b/lib/Config/Any.pm @@ -25,7 +25,7 @@ This document describes Config::Any version 0.09_02 my $cfg = Config::Any->load_files({files => \@filepaths, ... }); for (@$cfg) { - my ($filename, $config) = each %$_; + my ($filename, $config) = %$_; $class->config($config); warn "loaded config from file: $filename"; }