[catagits/Catalyst-Plugin-ConfigLoader.git] / t / 10-live_auto.t

use strict;
use warnings;

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

use Test::More tests => 4;

use Catalyst::Test 'TestApp';

{
    my $response;
    ok( $response = request('http://localhost/config/'), 'request ok' );
    is( $response->content, 'foo', 'config ok' );

    $response = request('http://localhost/appconfig/cache');
    ok( $response->content !~ /^__HOME__/, 'home dir substituted in config var' );

    $response = request('http://localhost/appconfig/foo');
    is( $response->content, 'bar', 'app finalize_config works' );
}
Commit	Line	Data
a7afecf7	1	use strict;
	2	use warnings;
	3
	4	use FindBin;
	5	use lib "$FindBin::Bin/lib";
	6
	7	use Test::More tests => 4;
	8
	9	use Catalyst::Test 'TestApp';
	10
	11	{
	12	my $response;
	13	ok( $response = request('http://localhost/config/'), 'request ok' );
	14	is( $response->content, 'foo', 'config ok' );
	15
	16	$response = request('http://localhost/appconfig/cache');
	17	ok( $response->content !~ /^__HOME__/, 'home dir substituted in config var' );
	18
	19	$response = request('http://localhost/appconfig/foo');
	20	is( $response->content, 'bar', 'app finalize_config works' );
	21	}