fix body_parameters is undef when no params

[catagits/Catalyst-Runtime.git] / t / lib / TestApp / Controller / BodyParams.pm

diff --git a/t/lib/TestApp/Controller/BodyParams.pm b/t/lib/TestApp/Controller/BodyParams.pm
index 5732211..ea6bf3a 100644 (file)
--- a/t/lib/TestApp/Controller/BodyParams.pm
+++ b/t/lib/TestApp/Controller/BodyParams.pm
@@ -10,4 +10,11 @@ sub default : Private {
     $c->res->status(200);
 }
 
+sub no_params : Local {
+    my ( $self, $c ) = @_;
+    my $params = $c->req->body_parameters;
+    $c->res->output(ref $params);
+    $c->res->status(200);
+}
+
 1;