Release commit for 0.35
[catagits/Catalyst-Plugin-ConfigLoader.git] / t / 20-mock_load.t
CommitLineData
a7afecf7 1package MockApp;
2
25cd1420 3use Test::More tests => 10;
a7afecf7 4use Cwd;
64443e1a 5
6# Remove all relevant env variables to avoid accidental fail
7foreach my $name ( grep { m{^(CATALYST)} } keys %ENV ) {
8 delete $ENV{ $name };
9}
10
a7afecf7 11$ENV{ CATALYST_HOME } = cwd . '/t/mockapp';
12
13use_ok( 'Catalyst', qw( ConfigLoader ) );
14
af391898 15__PACKAGE__->config->{ 'Plugin::ConfigLoader' }->{ substitutions } = {
587d381b 16 foo => sub { shift; join( '-', @_ ); }
d392c48d 17};
18
a7afecf7 19__PACKAGE__->setup;
20
a7afecf7 21ok( __PACKAGE__->config );
22is( __PACKAGE__->config->{ 'Controller::Foo' }->{ foo }, 'bar' );
23is( __PACKAGE__->config->{ 'Controller::Foo' }->{ new }, 'key' );
587d381b 24is( __PACKAGE__->config->{ 'Model::Baz' }->{ qux }, 'xyzzy' );
25is( __PACKAGE__->config->{ 'Model::Baz' }->{ another }, 'new key' );
26is( __PACKAGE__->config->{ 'view' }, 'View::TT::New' );
27is( __PACKAGE__->config->{ 'foo_sub' }, 'x-y' );
28is( __PACKAGE__->config->{ 'literal_macro' }, '__DATA__' );
25cd1420 29is( __PACKAGE__->config->{ 'Plugin::Zot' }->{ zoot }, 'zooot');