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=eb8e788018fe589b492238feb10c52a691b800de;hp=8040d5b91b7b5e52fe56f0a15690667302098211;hb=9d569cf0c9b945399035ced825ff7059692786c7;hpb=5a2e0210fe5c7da046be37b4240008f2b667be67 diff --git a/t/51-ini.t b/t/51-ini.t index 8040d5b..eb8e788 100644 --- a/t/51-ini.t +++ b/t/51-ini.t @@ -8,7 +8,7 @@ if ( !Config::Any::INI->is_supported ) { plan skip_all => 'INI format not supported'; } else { - plan tests => 11; + plan tests => 13; } { @@ -46,3 +46,12 @@ else { ok( $config, 'config loaded' ); is_deeply( $config, \%expected, 'subsections parsed properly' ); } + +# test invalid config +{ + my $file = 't/invalid/conf.ini'; + my $config = eval { Config::Any::INI->load( $file ) }; + + ok( !$config, 'config load failed' ); + ok( $@, "error thrown ($@)" ); +}