X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive%2Flib%2FTestApp%2FController%2FEngine%2FResponse%2FErrors.pm;fp=t%2Flive%2Flib%2FTestApp%2FController%2FEngine%2FResponse%2FErrors.pm;h=7e60a7f8350b56505f69ddbfb66dc6604615b35f;hb=fbcc39ad23f2bbecf5d84c9ba581e6af86fcd460;hp=0000000000000000000000000000000000000000;hpb=21465c884872c1ec8c30acd72796445f9eaacb31;p=catagits%2FCatalyst-Runtime.git diff --git a/t/live/lib/TestApp/Controller/Engine/Response/Errors.pm b/t/live/lib/TestApp/Controller/Engine/Response/Errors.pm new file mode 100644 index 0000000..7e60a7f --- /dev/null +++ b/t/live/lib/TestApp/Controller/Engine/Response/Errors.pm @@ -0,0 +1,23 @@ +package TestApp::Controller::Engine::Response::Errors; + +use strict; +use base 'Catalyst::Base'; + +sub one : Relative { + my ( $self, $c ) = @_; + my $a = 0; + my $b = 0; + my $t = $a / $b; +} + +sub two : Relative { + my ( $self, $c ) = @_; + $c->forward('/non/existing/path'); +} + +sub three : Relative { + my ( $self, $c ) = @_; + die("I'm going to die!\n"); +} + +1;