1 package Catalyst::Plugin::Test::Errors;
9 return $c->NEXT::error(@_);
12 if ( $_[0] =~ /^(Unknown resource|No default action defined)/ ) {
13 $c->response->status(404);
16 if ( $_[0] =~ /^Couldn\'t forward/ ) {
17 $c->response->status(404);
20 if ( $_[0] =~ /^Caught exception/ ) {
21 $c->response->status(500);
24 $c->response->headers->push_header( 'X-Catalyst-Error' => $_[0] );