use strict;
use warnings;
-our $VERSION = '0.88';
-$VERSION = eval $VERSION;
-our $AUTHORITY = 'cpan:STEVAN';
-
use base qw(Moose::Error::Default);
sub new {
$self->create_error_croak(@args);
}
-__PACKAGE__
+1;
+
+# ABSTRACT: Prefer C<croak>
__END__
=pod
-=head1 NAME
-
-Moose::Error::Croak - Prefer C<croak>
-
=head1 SYNOPSIS
- use metaclass => (
- metaclass => "Moose::Meta::Class",
- error_class => "Moose::Error::Croak",
+ # Metaclass definition must come before Moose is used.
+ use metaclass (
+ metaclass => 'Moose::Meta::Class',
+ error_class => 'Moose::Error::Croak',
);
+ use Moose;
+ # ...
=head1 DESCRIPTION