Commit | Line | Data |
---|---|---|
dd4e6fd2 | 1 | package TestApp::Controller::Action; |
2 | ||
3 | use strict; | |
684d10ed | 4 | use base 'Catalyst::Controller'; |
dd4e6fd2 | 5 | |
6 | sub begin : Private { | |
7 | my ( $self, $c ) = @_; | |
fbcc39ad | 8 | $c->res->header( 'X-Test-Class' => ref($self) ); |
dd4e6fd2 | 9 | $c->response->content_type('text/plain; charset=utf-8'); |
10 | } | |
11 | ||
12 | sub default : Private { | |
13 | my ( $self, $c ) = @_; | |
14 | $c->res->output("Error - TestApp::Controller::Action\n"); | |
4082e678 | 15 | $c->res->status(404); |
dd4e6fd2 | 16 | } |
17 | ||
18 | 1; |