Commit | Line | Data |
---|---|---|
ffc0b0d8 | 1 | use strict; |
2 | use warnings; | |
3 | ||
4 | use FindBin; | |
5 | use lib "$FindBin::Bin/../lib"; | |
6 | ||
5e3121a8 | 7 | use Test::More; |
ffc0b0d8 | 8 | |
9 | $ENV{ TESTAPPCONTAINER_CONFIG } = 'test.perl'; | |
10 | ||
11 | use_ok 'Catalyst::Test', 'TestAppContainer'; | |
12 | ||
13 | ok my ( $res, $c ) = ctx_request( '/' ), 'context object'; | |
14 | ||
15 | is_deeply $c->container->resolve( service => 'config_path' ), [ qw( test.perl perl ) ], 'path is "test.perl"'; | |
5e3121a8 | 16 | |
17 | done_testing; |