From: Christian Hansen Date: Tue, 14 Jun 2005 16:06:48 +0000 (+0000) Subject: Added docs to Catalyst::Exception X-Git-Tag: 5.7099_04~1315 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=ebfde331f96f61128105df0b2c4904cc0d5593e5 Added docs to Catalyst::Exception --- diff --git a/lib/Catalyst/Engine/HTTP/Daemon.pm b/lib/Catalyst/Engine/HTTP/Daemon.pm index aeaeea5..00daf22 100644 --- a/lib/Catalyst/Engine/HTTP/Daemon.pm +++ b/lib/Catalyst/Engine/HTTP/Daemon.pm @@ -98,7 +98,7 @@ sub run { unless ( defined $daemon ) { Catalyst::Exception->throw( - message => qq/Failed to create daemon. Reason: '$!'/ + message => qq/Failed to create daemon. Reason: '$!'/ ); } diff --git a/lib/Catalyst/Exception.pm b/lib/Catalyst/Exception.pm index fbb75e4..ade1a46 100644 --- a/lib/Catalyst/Exception.pm +++ b/lib/Catalyst/Exception.pm @@ -1,11 +1,12 @@ package Catalyst::Exception; -BEGIN { - push( @ISA, $CATALYST_EXCEPTION_CLASS || 'Catalyst::Exception::Base' ); -} - use strict; use vars qw[@ISA $CATALYST_EXCEPTION_CLASS]; +use UNIVERSAL::require; + +BEGIN { + push( @ISA, $CATALYST_EXCEPTION_CLASS || 'Catalyst::Exception::Base' ); +} package Catalyst::Exception::Base; @@ -30,7 +31,11 @@ This is the Catalyst Exception class. =over 4 -=item throw($message) +=item throw( $message ) + +=item throw( message => $message ) + +=item throw( error => $error ) Throws a fatal exception.