[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 the SubRequest plugin for these tests", 2;\r
    #}\r
    \r
    # skip this for now, until patched SubRequest is released\r
    skip "Awaiting patched SubRequest release", 2;\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
8cc672a2	14	#unless ( TestApp->isa('Catalyst::Plugin::SubRequest') ) {\r
	15	#skip "Install the SubRequest plugin for these tests", 2;\r
	16	#}\r
	17	\r
	18	# skip this for now, until patched SubRequest is released\r
	19	skip "Awaiting patched SubRequest release", 2;\r
82239955	20	\r
	21	ok( my $res = request('http://localhost/subtest'), 'Request' );\r
	22	is( $res->content, 'subtest2 ok', 'SubRequest ok' );\r
	23	}\r