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;fp=t%2Flib%2FTestApp%2FController%2FAction.pm;h=02bd50ac3c1868ee8b9047d15b107ef68788520e;hp=0000000000000000000000000000000000000000;hb=66741f94ac93b7ba0989db3556d0e3fe36c1be87;hpb=587b0f5882d4f5e128ae082758da37b065a3efde diff --git a/t/lib/TestApp/Controller/Action.pm b/t/lib/TestApp/Controller/Action.pm new file mode 100644 index 0000000..02bd50a --- /dev/null +++ b/t/lib/TestApp/Controller/Action.pm @@ -0,0 +1,17 @@ +package TestApp::Controller::Action; + +use strict; +use base 'Catalyst::Controller'; + +sub begin : Private { + my ( $self, $c ) = @_; + $c->res->header( 'X-Test-Class' => ref($self) ); + $c->response->content_type('text/plain; charset=utf-8'); +} + +sub default : Private { + my ( $self, $c ) = @_; + $c->res->output("Error - TestApp::Controller::Action\n"); +} + +1;