[catagits/Catalyst-View-TT.git] / t / 12expose_methods.t

use strict;
use warnings;
use Test::More;

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

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

my $response;
ok(($response = request("/test?view=ExposeMethods&template=expose_methods.tt"))->is_success, 'request ok');
is($response->content, "magic added param", 'message ok');
ok(($response = request("/test?view=ExposeMethodsSubclassed&template=expose_methods.tt"))->is_success, 'request ok');
is($response->content, "magic added param", 'message ok');

done_testing;
Commit	Line	Data
c577e7b8	1	use strict;
c577e7b8	2	use warnings;
1cb1d672	3	use Test::More;
c577e7b8	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?view=ExposeMethods&template=expose_methods.tt"))->is_success, 'request ok');
	12	is($response->content, "magic added param", 'message ok');
1cb1d672	13	ok(($response = request("/test?view=ExposeMethodsSubclassed&template=expose_methods.tt"))->is_success, 'request ok');
	14	is($response->content, "magic added param", 'message ok');
	15
	16	done_testing;