[p5sagit/Config-Any.git] / t / 50-general.t

use Test::More tests => 4;

use Config::Any::General;

my $config = eval { Config::Any::General->load( 't/conf/conf.conf' ) };

SKIP: {
    skip "Couldn't Load Config::General plugin", 4 if $@;
    ok( $config );
    is( $config->{ name }, 'TestApp' );
    ok( exists $config->{ Component } );

    $config = eval { Config::Any::General->load( 't/conf/conf.conf', { -LowerCaseNames => 1 } ) };

    ok( exists $config->{ component } );
}
Commit	Line	Data
9ac432c2	1	use Test::More tests => 4;
f0e3c221	2
	3	use Config::Any::General;
	4
	5	my $config = eval { Config::Any::General->load( 't/conf/conf.conf' ) };
	6
	7	SKIP: {
9ac432c2	8	skip "Couldn't Load Config::General plugin", 4 if $@;
f0e3c221	9	ok( $config );
f0e3c221	10	is( $config->{ name }, 'TestApp' );
9ac432c2	11	ok( exists $config->{ Component } );
	12
	13	$config = eval { Config::Any::General->load( 't/conf/conf.conf', { -LowerCaseNames => 1 } ) };
	14
	15	ok( exists $config->{ component } );
f0e3c221	16	}