X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FDump.pm;h=5ea3ba048d99657c7e480aab1fd38df22d51d949;hb=f7de4f5cd712ebad26eab6ec06c60a3d753a1461;hp=0a259e95657fbef2af3ea1976d310afb405aca2d;hpb=dd4e6fd2152eea9f5b0c1f559575ced7684ef257;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/lib/TestApp/Controller/Dump.pm b/t/lib/TestApp/Controller/Dump.pm
index 0a259e9..5ea3ba0 100644
--- a/t/lib/TestApp/Controller/Dump.pm
+++ b/t/lib/TestApp/Controller/Dump.pm
@@ -8,6 +8,11 @@ sub default : Action Private {
     $c->forward('TestApp::View::Dump');
 }
 
+sub env : Action Relative {
+    my ( $self, $c ) = @_;
+    $c->forward('TestApp::View::Dump', [\%ENV]);
+}
+
 sub parameters : Action Relative {
     my ( $self, $c ) = @_;
     $c->forward('TestApp::View::Dump::Parameters');
@@ -23,4 +28,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;