Commit | Line | Data |
ffc0b0d8 |
1 | use strict; |
2 | use warnings; |
3 | |
4 | use FindBin; |
5 | use lib "$FindBin::Bin/../lib"; |
6 | |
4ae2ac51 |
7 | use Test::More; |
8 | |
9 | use_ok('TestAppContainer'); |
10 | |
11 | is( TestAppContainer->controller('Config')->{foo}, 'foo', 'config ok' ); |
12 | |
13 | ok( TestAppContainer->config->{cache} !~ /^__HOME__/, |
14 | 'home dir substituted in config var' |
15 | ); |
16 | |
17 | is( TestAppContainer->config->{foo}, 'bar', 'app finalize_config works' ); |
18 | |
19 | my $home = TestAppContainer->config->{ home }; |
20 | my $path = join ',', |
21 | $home, TestAppContainer->path_to( 'x' ), |
22 | $home, TestAppContainer->path_to( 'y' ); |
23 | is( TestAppContainer->config->{multi}, $path, 'vars substituted in config var, twice' ); |
24 | |
25 | done_testing; |