X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FAction.pm;h=543d6e16a0a0434da09736695202cbd587697b18;hp=a2543213459343aff9218eb551e7e01fcbbf1479;hb=4082e67814e85bc9820e56eb38e5e21511c0a5f8;hpb=2680d54f21794a6068a3a72d95e900f7c9b82908 diff --git a/t/lib/TestApp/Controller/Action.pm b/t/lib/TestApp/Controller/Action.pm index a254321..543d6e1 100644 --- a/t/lib/TestApp/Controller/Action.pm +++ b/t/lib/TestApp/Controller/Action.pm @@ -1,19 +1,18 @@ package TestApp::Controller::Action; use strict; -use base 'Catalyst::Base'; +use base 'Catalyst::Controller'; sub begin : Private { my ( $self, $c ) = @_; - $c->res->header( 'X-Test-Class' => ref($self) ); + $c->res->header( 'X-Test-Class' => ref($self) ); $c->response->content_type('text/plain; charset=utf-8'); - - return 1; } sub default : Private { my ( $self, $c ) = @_; $c->res->output("Error - TestApp::Controller::Action\n"); + $c->res->status(404); } 1;