From: Rafael Kitover Date: Wed, 4 Aug 2010 20:11:24 +0000 (+0000) Subject: croak if Config::General is too old X-Git-Tag: v0.20~5 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=82222eccd9a0ff010db060d9cc4e11bbed9ee924;p=p5sagit%2FConfig-Any.git croak if Config::General is too old --- diff --git a/lib/Config/Any/General.pm b/lib/Config/Any/General.pm index 7bb1d1b..d16cf59 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'; @@ -52,6 +53,9 @@ sub load { require Config::General; + croak "Config::General 2.47 or later required" + unless Config::General->VERSION('2.47'); + $args->{ -ForceArray } = 1 unless exists $args->{ -ForceArray }; my $configfile = Config::General->new( %$args ); @@ -80,7 +84,7 @@ Specifies that this module requires L in order to work. =cut -sub requires_all_of { [ 'Config::General', '2.47' ] } +sub requires_all_of { [ 'Config::General' ] } =head1 AUTHOR