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=14b31a7eb5d9d4aad124bebc599b955cb2b248fa;hp=4a29f9896e785851a3cb173427871897bb89f191;hb=92c29326caaebb0ded4acf22cf92f4d6fb707eba;hpb=47730c9dc45ffc01cc6a6c431bff34e9583c7960 diff --git a/lib/Config/Any.pm b/lib/Config/Any.pm index 4a29f98..14b31a7 100644 --- a/lib/Config/Any.pm +++ b/lib/Config/Any.pm @@ -6,16 +6,12 @@ use warnings; use Carp; use Module::Pluggable::Object (); -our $VERSION = '0.11'; +our $VERSION = '0.12'; =head1 NAME Config::Any - Load configuration from different file formats, transparently -=head1 VERSION - -This document describes Config::Any version 0.10 - =head1 SYNOPSIS use Config::Any; @@ -163,6 +159,7 @@ sub _load { } my @results; + warn $@ if $@; for my $filename ( @{ $args->{ files } } ) { @@ -183,7 +180,7 @@ sub _load { = eval { $loader->load( $filename, $loader_args{ $loader } ); }; # fatal error if we used extension matching - croak "Error parsing file: $filename" if $@ and $use_ext_lut; + croak "Error parsing $filename: $@" if $@ and $use_ext_lut; next if $@ or !@configs; # post-process config with a filter callback