Commit | Line | Data |
bf6fa6b3 |
1 | package Moose::Error::Croak; |
2 | |
3 | use base qw(Moose::Error::Default); |
4 | |
5 | sub new { |
6 | my ( $self, @args ) = @_; |
7 | $self->create_error_croak(@args); |
8 | } |
9 | |
10 | __PACKAGE__ |
11 | |
12 | __END__ |
13 | |
14 | =pod |
15 | |
16 | =head1 NAME |
17 | |
18 | Moose::Error::Croak - Prefer C<croak> |
19 | |
20 | =head1 SYNOPSIS |
21 | |
22 | use metaclass => ( |
23 | metaclass => "Moose::Meta::Class", |
24 | error_class => "Moose::Error::Croak", |
25 | ); |
26 | |
27 | =head1 DESCRIPTION |
28 | |
29 | This error class uses L<Carp/croak> to raise errors generated in your |
30 | metaclass. |
31 | |
32 | =head1 METHODS |
33 | |
34 | =over 4 |
35 | |
36 | =item new |
37 | |
38 | Overrides L<Moose::Error::Default/new> to prefer C<croak>. |
39 | |
40 | =back |
41 | |
42 | =cut |
43 | |
44 | |