this only matters for lazy attributes with initializers
[gitmo/Moose.git] / lib / Moose / Error / Croak.pm
1 package Moose::Error::Croak;
2
3 use strict;
4 use warnings;
5
6 use base qw(Moose::Error::Default);
7
8 sub new {
9     my ( $self, @args ) = @_;
10     $self->create_error_croak(@args);
11 }
12
13 1;
14
15 # ABSTRACT: Prefer C<croak>
16
17 __END__
18
19 =pod
20
21 =head1 SYNOPSIS
22
23     # Metaclass definition must come before Moose is used.
24     use metaclass (
25         metaclass => 'Moose::Meta::Class',
26         error_class => 'Moose::Error::Croak',
27     );
28     use Moose;
29     # ...
30
31 =head1 DESCRIPTION
32
33 This error class uses L<Carp/croak> to raise errors generated in your
34 metaclass.
35
36 =head1 METHODS
37
38 =over 4
39
40 =item new
41
42 Overrides L<Moose::Error::Default/new> to prefer C<croak>.
43
44 =back
45
46 =cut
47
48