X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FConfig-Any.git;a=blobdiff_plain;f=t%2F62-multi.t;h=df57486bed2efb638db67a398433749357d5ef00;hp=b8b9d7e552e82eb1b0909359103a9626c4d2859a;hb=5a2e0210fe5c7da046be37b4240008f2b667be67;hpb=a918b0b8b7952db918dfabb8dc72bf34832d43d0 diff --git a/t/62-multi.t b/t/62-multi.t index b8b9d7e..df57486 100644 --- a/t/62-multi.t +++ b/t/62-multi.t @@ -1,8 +1,8 @@ -use Test::More tests => 3; - use strict; use warnings; +use Test::More tests => 3; + use Config::Any; use Config::Any::YAML; @@ -19,10 +19,15 @@ my @expect = ( my @results = eval { Config::Any::YAML->load( $file ); }; SKIP: { - skip "Can't load YAML files", 3 if $@; + skip "Can't load multi-stream YAML files", 3 if $@; is( @results, 2, '2 documents' ); is_deeply( \@results, \@expect, 'structures ok' ); - my $return = Config::Any->load_files( { use_ext => 1, files => [ $file ] } ); - is_deeply( $return, [ { $file => \@expect } ], 'config-any structures ok' ); + my $return + = Config::Any->load_files( { use_ext => 1, files => [ $file ] } ); + is_deeply( + $return, + [ { $file => \@expect } ], + 'config-any structures ok' + ); }