X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FConfig-Any.git;a=blobdiff_plain;f=t%2F53-perl.t;h=6d2d5ca70aeab4707ddd6f9467cbf643ca0f974a;hp=4914075b6515d248297b3987ececf33879f4d5fb;hb=5f5b9e4c575591a0749103e0bbeb556cde5c5cac;hpb=f0e3c2214342d0d8a8839009b8b9c7e6bfbc7ab2 diff --git a/t/53-perl.t b/t/53-perl.t index 4914075..6d2d5ca 100644 --- a/t/53-perl.t +++ b/t/53-perl.t @@ -1,11 +1,18 @@ -use Test::More tests => 2; +use strict; +use warnings; + +use Test::More tests => 3; use Config::Any::Perl; -my $config = eval { Config::Any::Perl->load( 't/conf/conf.pl' ) }; +{ + my $file = 't/conf/conf.pl'; + my $config = Config::Any::Perl->load( $file ); -SKIP: { - skip "Couldn't Load Perl plugin", 2 if $@; ok( $config ); is( $config->{ name }, 'TestApp' ); + + my $config_load2 = Config::Any::Perl->load( $file ); + is_deeply( $config_load2, $config, 'multiple loads of the same file' ); } +