[catagits/Catalyst-Plugin-ConfigLoader.git] / t / 20-mock_load.t

package MockApp;

use Test::More tests => 7;

use Cwd;
$ENV{ CATALYST_HOME } = cwd . '/t/mockapp';

use_ok( 'Catalyst', qw( ConfigLoader ) );

__PACKAGE__->setup;

use Data::Dumper; print Dumper __PACKAGE__->config;

ok( __PACKAGE__->config );
is( __PACKAGE__->config->{ 'Controller::Foo' }->{ foo }, 'bar' );
is( __PACKAGE__->config->{ 'Controller::Foo' }->{ new }, 'key' );
is( __PACKAGE__->config->{ 'Model::Baz' }->{ qux }, 'xyzzy' );
is( __PACKAGE__->config->{ 'Model::Baz' }->{ another }, 'new key' );
is( __PACKAGE__->config->{ 'view' }, 'View::TT::New' );
Commit	Line	Data
a7afecf7	1	package MockApp;
	2
	3	use Test::More tests => 7;
	4
	5	use Cwd;
	6	$ENV{ CATALYST_HOME } = cwd . '/t/mockapp';
	7
	8	use_ok( 'Catalyst', qw( ConfigLoader ) );
	9
	10	__PACKAGE__->setup;
	11
	12	use Data::Dumper; print Dumper __PACKAGE__->config;
	13
	14	ok( __PACKAGE__->config );
	15	is( __PACKAGE__->config->{ 'Controller::Foo' }->{ foo }, 'bar' );
	16	is( __PACKAGE__->config->{ 'Controller::Foo' }->{ new }, 'key' );
	17	is( __PACKAGE__->config->{ 'Model::Baz' }->{ qux }, 'xyzzy' );
	18	is( __PACKAGE__->config->{ 'Model::Baz' }->{ another }, 'new key' );
	19	is( __PACKAGE__->config->{ 'view' }, 'View::TT::New' );