7 package My::Meta::Class;
9 BEGIN { extends 'Moose::Meta::Class' };
11 package Moose::Meta::Class::Custom::MyMetaClass;
12 sub register_implementation { 'My::Meta::Class' }
17 use Moose -metaclass => 'My::Meta::Class';
21 package My::Class::Aliased;
22 use Moose -metaclass => 'MyMetaClass';
25 is(My::Class->meta->meta->name, 'My::Meta::Class');
26 is(My::Class::Aliased->meta->meta->name, 'My::Meta::Class');