X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FEngine%2FResponse%2FHeaders.pm;h=776862a7a6534032ff250394c826c060dbeccc78;hb=2d6d24356b60aee54cfc81afafdaaccdc3c016db;hp=7b624f45e5a0e2b7cb66f2dc5212bef3948e13bc;hpb=dd4e6fd2152eea9f5b0c1f559575ced7684ef257;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestApp/Controller/Engine/Response/Headers.pm b/t/lib/TestApp/Controller/Engine/Response/Headers.pm index 7b624f4..776862a 100644 --- a/t/lib/TestApp/Controller/Engine/Response/Headers.pm +++ b/t/lib/TestApp/Controller/Engine/Response/Headers.pm @@ -1,14 +1,14 @@ package TestApp::Controller::Engine::Response::Headers; use strict; -use base 'Catalyst::Base'; +use base 'Catalyst::Controller'; sub one : Relative { my ( $self, $c ) = @_; - $c->res->header( 'X-Header-Catalyst' => 'Cool' ); - $c->res->header( 'X-Header-Cool' => 'Catalyst' ); - $c->res->header( 'X-Header-Numbers' => [ 1 .. 10 ] ); - $c->forward('TestApp::View::Dump::Request'); + $c->res->header( 'X-Header-Catalyst' => 'Cool' ); + $c->res->header( 'X-Header-Cool' => 'Catalyst' ); + $c->res->header( 'X-Header-Numbers' => join ', ', 1 .. 10 ); + $c->forward('TestApp::View::Dump', [ { some => [qw(fixed content)] } ]); } 1;