[catagits/Catalyst-View-TT.git] / t / 07render.t

use strict;
use warnings;
use Test::More tests => 5;

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

use_ok('Catalyst::Test', 'TestApp');

my $response;
ok(($response = request("/test_render?template=specified_template.tt&param=parameterized"))->is_success, 'request ok');
is($response->content, "I should be a parameterized test in @{[TestApp->config->{name}]}", 'message ok');

my $message = 'Dynamic message';

ok(($response = request("/test_msg?msg=$message"))->is_success, 'request ok');
is($response->content, "$message", 'message ok');
Commit	Line	Data
1bc9fc55	1	use strict;
	2	use warnings;
	3	use Test::More tests => 5;
	4
	5	use FindBin;
	6	use lib "$FindBin::Bin/lib";
	7
	8	use_ok('Catalyst::Test', 'TestApp');
	9
	10	my $response;
	11	ok(($response = request("/test_render?template=specified_template.tt&param=parameterized"))->is_success, 'request ok');
	12	is($response->content, "I should be a parameterized test in @{[TestApp->config->{name}]}", 'message ok');
	13
	14	my $message = 'Dynamic message';
	15
	16	ok(($response = request("/test_msg?msg=$message"))->is_success, 'request ok');
	17	is($response->content, "$message", 'message ok');