[Catalyst-commits] r13471 - trunk/Config-Any/lib/Config/Any

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2010-08-04 21:11:24 +0100 (Wed, 04 Aug 2010)
New Revision: 13471

Modified:
   trunk/Config-Any/lib/Config/Any/General.pm
Log:
croak if Config::General is too old

Modified: trunk/Config-Any/lib/Config/Any/General.pm
===================================================================
--- trunk/Config-Any/lib/Config/Any/General.pm	2010-08-04 20:04:14 UTC (rev 13470)
+++ trunk/Config-Any/lib/Config/Any/General.pm	2010-08-04 20:11:24 UTC (rev 13471)
@@ -2,6 +2,7 @@
 
 use strict;
 use warnings;
+use Carp;
 
 use base 'Config::Any::Base';
 
@@ -52,6 +53,9 @@
 
     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 @@
 
 =cut
 
-sub requires_all_of { [ 'Config::General', '2.47' ] }
+sub requires_all_of { [ 'Config::General' ] }
 
 =head1 AUTHOR