[catagits/Catalyst-Runtime.git] / t / aggregate / unit_core_container_path_env.t

use strict;
use warnings;

use FindBin;
use lib "$FindBin::Bin/../lib";

use Test::More;

$ENV{ TESTAPPCONTAINER_CONFIG } = 'test.perl';

use_ok 'Catalyst::Test', 'TestAppContainer';

ok my ( $res, $c ) = ctx_request( '/' ), 'context object';

is_deeply $c->container->resolve( service => 'config_path' ), [ qw( test.perl perl ) ], 'path is "test.perl"';

done_testing;
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
5e3121a8	17	done_testing;