use_ok('MooseX::MetaDescription::Meta::Class');
use_ok('MooseX::MetaDescription::Meta::Attribute');
- use_ok('MooseX::MetaDescription::Meta::Attribute::Trait');
-
- use_ok('MooseX::MetaDescription::Meta::Role::HasMetaDescription');
+ use_ok('MooseX::MetaDescription::Meta::Trait');
use_ok('MooseX::MetaDescription::Description');
- use_ok('MooseX::MetaDescription::Description::Class');
- use_ok('MooseX::MetaDescription::Description::Attribute');
}
);
has 'baz' => (
- traits => [ 'MooseX::MetaDescription::Meta::Attribute::Trait' ],
+ traits => [ 'MooseX::MetaDescription::Meta::Trait' ],
is => 'ro',
isa => 'Str',
default => sub { 'Foo::baz' },
# check the meta-desc
my $foo_class = Foo->meta;
-isa_ok($foo_class->metadescription, 'MooseX::MetaDescription::Description::Class');
+isa_ok($foo_class->metadescription, 'MooseX::MetaDescription::Description');
is($foo_class->metadescription->descriptor, $foo_class, '... got the circular ref');
my $bar_attr = Foo->meta->get_attribute('bar');
-isa_ok($bar_attr->metadescription, 'MooseX::MetaDescription::Description::Attribute');
+isa_ok($bar_attr->metadescription, 'MooseX::MetaDescription::Description');
is($bar_attr->metadescription->descriptor, $bar_attr, '... got the circular ref');
my $baz_attr = Foo->meta->get_attribute('baz');
-isa_ok($baz_attr->metadescription, 'MooseX::MetaDescription::Description::Attribute');
+isa_ok($baz_attr->metadescription, 'MooseX::MetaDescription::Description');
is($baz_attr->metadescription->descriptor, $baz_attr, '... got the circular ref');
# check the actual descs