X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp.pm;h=fe4b490c2a945c7f4b2b3ed5e66d338d58be25a9;hb=39f0812babb68550fa3c50eb373db3ce7d91a287;hp=139905e3d3e18dc75197b1b793a6da6d68655622;hpb=5bd316a5c1d9cf7939e2df1994011a9178cb7c16;p=catagits%2FCatalyst-Plugin-SubRequest.git

diff --git a/t/lib/TestApp.pm b/t/lib/TestApp.pm
index 139905e..fe4b490 100644
--- a/t/lib/TestApp.pm
+++ b/t/lib/TestApp.pm
@@ -25,6 +25,14 @@ __PACKAGE__->setup();
         $c->res->body($c->res->body().$arg);
     }
     
+    sub subtest_params : Global {
+        my ( $self, $c ) = @_;
+        my $before = $c->req->params->{value};
+        my $subreq = $c->subreq('/normal/2');
+        my $after = $c->req->params->{value};
+        $c->res->body($c->res->body().$after);
+    }
+
     sub end : Private {
         my ( $self, $c ) = @_;
         $c->res->body($c->res->body().'3');