use Class::MOP::Method::Wrapped;
use Class::MOP::Method::Accessor;
use Class::MOP::Method::Constructor;
-use Class::MOP::Method::Meta;
use Class::MOP::MiniTrait;
use Carp 'confess';
: ref $self;
}
-sub _add_meta_method {
- my $self = shift;
- $self->add_method(
- 'meta' => Class::MOP::Method::Meta->wrap(
- name => 'meta',
- package_name => $self->name,
- associated_metaclass => $self,
- )
- );
-}
-
sub _new {
my $class = shift;