X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FDump.pm;h=5ea3ba048d99657c7e480aab1fd38df22d51d949;hb=7033c56c02869e4c4950f4861c7ae3cf118b42c1;hp=df33eb5e714a8f6388e8182042cf9606cfaab645;hpb=66741f94ac93b7ba0989db3556d0e3fe36c1be87;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;