[catagits/Catalyst-Plugin-Static-Simple.git] / t / 08subreq.t

#!perl\r
\r
use strict;\r
use warnings;\r
\r
use FindBin;\r
use lib "$FindBin::Bin/lib";\r
\r
use Test::More tests => 2;\r
use Catalyst::Test 'TestApp';\r
\r
SKIP:\r
{\r
    unless ( TestApp->isa('Catalyst::Plugin::SubRequest') ) {\r
        skip "Install Catalyst::Plugin::SubRequest >= 0.08 for these tests", 2;\r
    }\r
\r
    ok( my $res = request('http://localhost/subtest'), 'Request' );\r
    is( $res->content, 'subtest2 ok', 'SubRequest ok' );\r
}\r
Commit	Line	Data
82239955	1	#!perl\r
	2	\r
	3	use strict;\r
	4	use warnings;\r
	5	\r
	6	use FindBin;\r
	7	use lib "$FindBin::Bin/lib";\r
	8	\r
	9	use Test::More tests => 2;\r
	10	use Catalyst::Test 'TestApp';\r
	11	\r
	12	SKIP:\r
	13	{\r
2cb3d585	14	unless ( TestApp->isa('Catalyst::Plugin::SubRequest') ) {\r
	15	skip "Install Catalyst::Plugin::SubRequest >= 0.08 for these tests", 2;\r
	16	}\r
82239955	17	\r
	18	ok( my $res = request('http://localhost/subtest'), 'Request' );\r
	19	is( $res->content, 'subtest2 ok', 'SubRequest ok' );\r
	20	}\r