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=5e51b4124d3c65fbb6a145285ac5d442be2a59b9;hp=4914075b6515d248297b3987ececf33879f4d5fb;hb=7c2181827882c125de98ccbe16402f5b277a3f44;hpb=f0e3c2214342d0d8a8839009b8b9c7e6bfbc7ab2 diff --git a/t/53-perl.t b/t/53-perl.t index 4914075..5e51b41 100644 --- a/t/53-perl.t +++ b/t/53-perl.t @@ -1,11 +1,17 @@ -use Test::More tests => 2; +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 = eval { Config::Any::Perl->load( $file ) }; SKIP: { - skip "Couldn't Load Perl plugin", 2 if $@; + skip "Couldn't Load Perl plugin", 3 if $@; + ok( $config ); is( $config->{ name }, 'TestApp' ); + + my $config_2 = eval { Config::Any::Perl->load( $file ) }; + + is_deeply( $config_2, $config, 'multiple loads of perl configs' ); }