X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FEngine%2FCGI.pm;h=11d8ebf4c8b09a2bd7c0870940bfc187bf402895;hb=a2f2cde95194a17fe2401ae58c92b5494bac599f;hp=409ce5a87a75ca667861a431dd780b7760bebdd0;hpb=66294129a6520edc031aa7a43fc9bdfce669af15;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Engine/CGI.pm b/lib/Catalyst/Engine/CGI.pm index 409ce5a..11d8ebf 100644 --- a/lib/Catalyst/Engine/CGI.pm +++ b/lib/Catalyst/Engine/CGI.pm @@ -3,6 +3,7 @@ package Catalyst::Engine::CGI; use strict; use base 'Catalyst::Engine::CGI::Base'; +use Catalyst::Exception; use CGI; our @compile = qw[ @@ -132,7 +133,10 @@ sub prepare_request { else { my $class = ref($object); - die( qq/Invalid argument $object/ ); + + Catalyst::Exception->throw( + message => qq/Unknown object '$object'/ + ); } }