Commit | Line | Data |
4f63af80 |
1 | package MockApp; |
2 | |
3 | use Test::More tests => 9; |
4 | |
5 | use Cwd; |
587d381b |
6 | $ENV{ CATALYST_HOME } = cwd . '/t/mockapp'; |
4f63af80 |
7 | $ENV{ MOCKAPP_CONFIG } = $ENV{ CATALYST_HOME } . '/mockapp.pl'; |
8 | |
9 | use_ok( 'Catalyst', qw( ConfigLoader ) ); |
10 | |
11 | __PACKAGE__->config->{ 'Plugin::ConfigLoader' }->{ substitutions } = { |
587d381b |
12 | foo => sub { shift; join( '-', @_ ); } |
4f63af80 |
13 | }; |
14 | |
15 | __PACKAGE__->setup; |
16 | |
17 | ok( __PACKAGE__->config ); |
18 | is( __PACKAGE__->config->{ 'Controller::Foo' }->{ foo }, 'bar' ); |
19 | is( __PACKAGE__->config->{ 'Controller::Foo' }->{ new }, 'key' ); |
587d381b |
20 | is( __PACKAGE__->config->{ 'Model::Baz' }->{ qux }, 'xyzzy' ); |
21 | is( __PACKAGE__->config->{ 'Model::Baz' }->{ another }, 'new key' ); |
22 | is( __PACKAGE__->config->{ 'view' }, 'View::TT::New' ); |
23 | is( __PACKAGE__->config->{ 'foo_sub' }, 'x-y' ); |
24 | is( __PACKAGE__->config->{ 'literal_macro' }, '__DATA__' ); |