use strict;
use warnings;
-our $VERSION = '0.93_03';
+our $VERSION = '1.19';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
+use Class::MOP::MiniTrait;
+
use base 'Class::MOP::Method';
+Class::MOP::MiniTrait::apply(__PACKAGE__, 'Moose::Meta::Object::Trait');
+
sub _error_thrower {
my $self = shift;
( ref $self && $self->associated_metaclass ) || "Moose::Meta::Class";
=head1 DESCRIPTION
-This class is a subclass of L<Class::MOP::Class> that provides
+This class is a subclass of L<Class::MOP::Method> that provides
additional Moose-specific functionality, all of which is private.
-To understand this class, you should read the the L<Class::MOP::Class>
+To understand this class, you should read the the L<Class::MOP::Method>
documentation.
=head1 INHERITANCE