X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fmore-psgi-compat.t;h=d7c61015c58e139f4285b6ac66a5f7591307b231;hp=da2a29296b5267a24e258a2047c24bed36df389f;hb=29707b1989d7539034ac46af6db85be20a236fe7;hpb=88ba7793bb132b13ecea722fcc56313756a408b9

diff --git a/t/more-psgi-compat.t b/t/more-psgi-compat.t
index da2a292..d7c6101 100644
--- a/t/more-psgi-compat.t
+++ b/t/more-psgi-compat.t
@@ -51,6 +51,16 @@ use Catalyst::Test 'TestFromPSGI';
   is $merged->get('d'), 4;
   is $merged->get('a'), 1;
   is $merged->get('b'), 2;
+
+  is $c->req->parameters->get('c'), 3;
+  is $c->req->parameters->get('d'), 4;
+  is $c->req->parameters->get('a'), 1;
+  is $c->req->parameters->get('b'), 2;
+
+  is $c->req->body_parameters->get('c'), 3;
+  is $c->req->body_parameters->get('d'), 4;
+  is $c->req->query_parameters->get('a'), 1;
+  is $c->req->query_parameters->get('b'), 2;
 }
 
 done_testing;