X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FException.pm;h=ee85e1e0907fc84c0dce7a6885c5dd66229a2dcc;hb=908e3d9e7a61974b3807b7ab37862550452b2456;hp=fbb75e452d221fd4851bbfb0808b2f3fe2fd88f4;hpb=a2f2cde95194a17fe2401ae58c92b5494bac599f;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Exception.pm b/lib/Catalyst/Exception.pm index fbb75e4..ee85e1e 100644 --- a/lib/Catalyst/Exception.pm +++ b/lib/Catalyst/Exception.pm @@ -1,12 +1,12 @@ package Catalyst::Exception; -BEGIN { - push( @ISA, $CATALYST_EXCEPTION_CLASS || 'Catalyst::Exception::Base' ); -} - use strict; use vars qw[@ISA $CATALYST_EXCEPTION_CLASS]; +BEGIN { + push( @ISA, $CATALYST_EXCEPTION_CLASS || 'Catalyst::Exception::Base' ); +} + package Catalyst::Exception::Base; use strict; @@ -28,9 +28,11 @@ This is the Catalyst Exception class. =head1 METHODS -=over 4 +=head2 throw( $message ) -=item throw($message) +=head2 throw( message => $message ) + +=head2 throw( error => $error ) Throws a fatal exception. @@ -47,8 +49,6 @@ sub throw { Carp::croak($message); } -=back - =head1 AUTHOR Sebastian Riedel, C