1 package Catalyst::Exception;
3 # XXX: See bottom of file for Exception implementation
7 Catalyst::Exception - Catalyst Exception Class
11 Catalyst::Exception->throw( qq/Fatal exception/ );
17 This is the Catalyst Exception class.
21 =head2 throw( $message )
23 =head2 throw( message => $message )
25 =head2 throw( error => $error )
27 Throws a fatal exception.
35 Catalyst Contributors, see Catalyst.pm
39 This library is free software. You can redistribute it and/or modify
40 it under the same terms as Perl itself.
45 package Catalyst::Exception::Base;
48 use namespace::clean -except => 'meta';
50 with 'Catalyst::Exception::Basic';
52 __PACKAGE__->meta->make_immutable;
56 package Catalyst::Exception;
59 use namespace::clean -except => 'meta';
61 use vars qw[$CATALYST_EXCEPTION_CLASS];
64 extends($CATALYST_EXCEPTION_CLASS || 'Catalyst::Exception::Base');
67 __PACKAGE__->meta->make_immutable;