X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FConfig-Any.git;a=blobdiff_plain;f=lib%2FConfig%2FAny%2FPerl.pm;h=2798d87e09a845c50be0f1f85e7c61c9e1de6d9e;hp=6a2e3301013a749b6848ee5c1196a1443d4fb7e0;hb=d49610ab8c8f7a8fa979a60fa75eb20ae690135b;hpb=72628dc786ef43d546023d6f17a86c3f5edeb21a diff --git a/lib/Config/Any/Perl.pm b/lib/Config/Any/Perl.pm index 6a2e330..2798d87 100644 --- a/lib/Config/Any/Perl.pm +++ b/lib/Config/Any/Perl.pm @@ -3,6 +3,8 @@ package Config::Any::Perl; use strict; use warnings; +use base 'Config::Any::Base'; + my %cache; =head1 NAME @@ -47,23 +49,13 @@ sub load { my $content; unless ( $content = $cache{ $file } ) { - $content = eval { require $file }; + $content = require $file; $cache{ $file } = $content; } return $content; } -=head2 is_supported( ) - -Returns true. - -=cut - -sub is_supported { - return 1; -} - =head1 AUTHOR Brian Cassidy Ebricas@cpan.orgE