Merge up from 5.70 trunk:
[catagits/Catalyst-Runtime.git] / t / lib / TestApp / Controller / Dump.pm
index df33eb5..4b20f33 100644 (file)
@@ -29,4 +29,9 @@ sub response : Action Relative {
     $c->forward('TestApp::View::Dump::Response');
 }
 
+sub body : Action Relative {
+    my ( $self, $c ) = @_;
+    $c->forward('TestApp::View::Dump::Body');
+}
+
 1;