Commit | Line | Data |
41f47406 |
1 | use Test::More tests => 9; |
2 | |
3 | use Config::Any::INI; |
4 | |
5 | my $config = eval { Config::Any::INI->load( 't/conf/conf.ini' ) }; |
6 | my $simpleconfig = eval { Config::Any::INI->load( 't/conf/conf2.ini' ) }; |
7 | |
8 | SKIP: { |
9 | skip "Couldn't Load INI plugin", 6 if $@; |
10 | ok( $config, "loaded INI config #1" ); |
11 | is( $config->{ name }, 'TestApp', "toplevel key lookup succeeded" ); |
12 | is( $config->{Component}->{Controller::Foo}->{foo}, 'bar', "nested hashref hack lookup succeeded"); |
13 | |
14 | ok( $simpleconfig, "loaded INI config #1" ); |
15 | is( $simpleconfig->{ name }, 'TestApp', "toplevel key lookup succeeded" ); |
16 | is( $simpleconfig->{Controller::Foo}->{foo}, 'bar', "nested hashref hack lookup succeeded" ); |
17 | } |
18 | |
19 | $Config::Any::INI::MAP_SECTION_SPACE_TO_NESTED_KEY = 0; |
20 | my $unspaced_config = eval { Config::Any::INI->load( 't/conf/conf.ini' ); }; |
21 | SKIP: { |
22 | skip "Couldn't load INI plugin", 3 if $@; |
23 | ok( $unspaced_config, "loaded INI config #1 in no-map-space mode" ); |
24 | is( $unspaced_config->{name}, 'TestApp', "toplevel key lookup succeeded" ); |
25 | is( $unspaced_config->{'Component Controller::Foo'}->{foo}, 'bar', "unnested key lookup succeeded"); |
26 | } |