X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FConfig-Any.git;a=blobdiff_plain;f=lib%2FConfig%2FAny%2FGeneral.pm;h=5c697e92e1a058e495245f81fac36f93cb0de10e;hp=936bb4498a8fdc8661bc968822112dd3b36bee8b;hb=2b645c42bc8c5c33f533f7ea97c812f1fc1636d7;hpb=7adf5673d07031b77f7edd3403491512b9a48cb3 diff --git a/lib/Config/Any/General.pm b/lib/Config/Any/General.pm index 936bb44..5c697e9 100644 --- a/lib/Config/Any/General.pm +++ b/lib/Config/Any/General.pm @@ -2,6 +2,7 @@ package Config::Any::General; use strict; use warnings; +use Carp; use base 'Config::Any::Base'; @@ -50,9 +51,11 @@ sub load { $args->{ -ConfigFile } = $file; + require Config::General; + Config::General->VERSION('2.47'); + $args->{ -ForceArray } = 1 unless exists $args->{ -ForceArray }; - require Config::General; my $configfile = Config::General->new( %$args ); my $config = { $configfile->getall }; @@ -79,7 +82,7 @@ Specifies that this module requires L in order to work. =cut -sub requires_all_of { 'Config::General' } +sub requires_all_of { [ 'Config::General' ] } =head1 AUTHOR