X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F08subreq.t;fp=t%2F08subreq.t;h=bd3f06c337145a69f2ecb841883b8285f2b3f760;hb=8223995544e9031e40cac6e1d06ffc1ac8d8a275;hp=0000000000000000000000000000000000000000;hpb=a28d35e93b7cf4de0f26f18774378bef7d99565e;p=catagits%2FCatalyst-Plugin-Static-Simple.git

diff --git a/t/08subreq.t b/t/08subreq.t
new file mode 100644
index 0000000..bd3f06c
--- /dev/null
+++ b/t/08subreq.t
@@ -0,0 +1,20 @@
+#!perl
+
+use strict;
+use warnings;
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use Test::More tests => 2;
+use Catalyst::Test 'TestApp';
+
+SKIP:
+{
+    if ( ! TestApp->isa('Catalyst::Plugin::SubRequest') ) {
+        skip "Install the SubRequest plugin for these tests", 2;
+    }
+
+    ok( my $res = request('http://localhost/subtest'), 'Request' );
+    is( $res->content, 'subtest2 ok', 'SubRequest ok' );
+}