[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 } );
9ac432c2	12
92a04e78	13	$config = eval {
	14	Config::Any::General->load( 't/conf/conf.conf',
	15	{ -LowerCaseNames => 1 } );
	16	};
9ac432c2	17
9ac432c2	18	ok( exists $config->{ component } );
f0e3c221	19	}