X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FConfig-Any.git;a=blobdiff_plain;f=t%2F51-ini.t;h=c7d6036b8b9233abe3db5aa82e9b8687968a5ec0;hp=dbeadc5fe1d85645696746690241e363b0c3aa3c;hb=92a04e78451078b33f75e7c44d247b024c27b4f7;hpb=e23825ecd2eaaeba8d95b59317a5b78f3c4924bf diff --git a/t/51-ini.t b/t/51-ini.t index dbeadc5..c7d6036 100644 --- a/t/51-ini.t +++ b/t/51-ini.t @@ -2,18 +2,20 @@ use Test::More tests => 9; use Config::Any::INI; -my $config = eval { Config::Any::INI->load( 't/conf/conf.ini' ) }; +my $config = eval { Config::Any::INI->load( 't/conf/conf.ini' ) }; my $simpleconfig = eval { Config::Any::INI->load( 't/conf/conf2.ini' ) }; SKIP: { skip "Couldn't Load INI plugin", 6 if $@; ok( $config, "loaded INI config #1" ); is( $config->{ name }, 'TestApp', "toplevel key lookup succeeded" ); - is( $config->{Component}->{Controller::Foo}->{foo}, 'bar', "nested hashref hack lookup succeeded"); - + is( $config->{ Component }->{ Controller::Foo }->{ foo }, + 'bar', "nested hashref hack lookup succeeded" ); + ok( $simpleconfig, "loaded INI config #1" ); is( $simpleconfig->{ name }, 'TestApp', "toplevel key lookup succeeded" ); - is( $simpleconfig->{Controller::Foo}->{foo}, 'bar', "nested hashref hack lookup succeeded" ); + is( $simpleconfig->{ Controller::Foo }->{ foo }, + 'bar', "nested hashref hack lookup succeeded" ); } $Config::Any::INI::MAP_SECTION_SPACE_TO_NESTED_KEY = 0; @@ -21,6 +23,8 @@ my $unspaced_config = eval { Config::Any::INI->load( 't/conf/conf.ini' ); }; SKIP: { skip "Couldn't load INI plugin", 3 if $@; ok( $unspaced_config, "loaded INI config #1 in no-map-space mode" ); - is( $unspaced_config->{name}, 'TestApp', "toplevel key lookup succeeded" ); - is( $unspaced_config->{'Component Controller::Foo'}->{foo}, 'bar', "unnested key lookup succeeded"); + is( $unspaced_config->{ name }, + 'TestApp', "toplevel key lookup succeeded" ); + is( $unspaced_config->{ 'Component Controller::Foo' }->{ foo }, + 'bar', "unnested key lookup succeeded" ); }