X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FEngine.pm;h=a0958110ac4baa5d84e383f3a88c3e59a07a66a7;hp=ee6afcbb592439e978271cda721a4770f42e7637;hb=890511ad3dac68ac7e9b8965dc7484beb4cee5fa;hpb=78728dc6dfe8585f3216764b359c2439be2a8e7b diff --git a/lib/Catalyst/Engine.pm b/lib/Catalyst/Engine.pm index ee6afcb..a095811 100644 --- a/lib/Catalyst/Engine.pm +++ b/lib/Catalyst/Engine.pm @@ -205,8 +205,12 @@ sub execute { else { $c->state( &$code( $class, $c, @{ $c->req->args } ) ) } }; if ( my $error = $@ ) { - chomp $error; - $error = qq/Caught exception "$error"/; + + unless ( ref $error ) { + chomp $error; + $error = qq/Caught exception "$error"/; + } + $c->log->error($error); $c->error($error); $c->state(0);