X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FDump.pm;h=5ea3ba048d99657c7e480aab1fd38df22d51d949;hb=ae29b412955743885e80350085167b54b69672da;hp=df33eb5e714a8f6388e8182042cf9606cfaab645;hpb=e16a6c4e6c4d49e73b5286b3186616af14f3f554;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestApp/Controller/Dump.pm b/t/lib/TestApp/Controller/Dump.pm index df33eb5..5ea3ba0 100644 --- a/t/lib/TestApp/Controller/Dump.pm +++ b/t/lib/TestApp/Controller/Dump.pm @@ -10,8 +10,7 @@ sub default : Action Private { sub env : Action Relative { my ( $self, $c ) = @_; - $c->stash( env => \%ENV ); - $c->forward('TestApp::View::Dump'); + $c->forward('TestApp::View::Dump', [\%ENV]); } sub parameters : Action Relative { @@ -29,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;