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=bec4fc337686af1b9fb036c5b225982abc16ab2d;hp=301e006e7887bdeb6ab779343155b6035fb0487d;hb=0c6989c600781af4bb31154abd7752ffdc212e4e;hpb=06fb16e20c0124f9d71f2089e8c9a1ab9d44883b 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"; }