X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F101-meta-attribute.t;h=f32db9dda07134d75bed5dc0e1b2e6580cc1c1be;hb=181502b9e199623db8915eed96ad5f7f2c478835;hp=cef1e3a3acd992417a00fb869299b09fa9391d9b;hpb=97661b774fd00a06d0eecdc17af4c6ca9ff0bee1;p=gitmo%2FMouse.git diff --git a/t/101-meta-attribute.t b/t/101-meta-attribute.t index cef1e3a..f32db9d 100644 --- a/t/101-meta-attribute.t +++ b/t/101-meta-attribute.t @@ -23,9 +23,9 @@ isa_ok($meta, 'Mouse::Meta::Class'); my $attr = $meta->get_attribute('pawn'); isa_ok($attr, 'Mouse::Meta::Attribute'); -can_ok($attr, qw(name class predicate clearer)); +can_ok($attr, qw(name associated_class predicate clearer)); is($attr->name, 'pawn', 'attribute name'); -is($attr->class, 'Class', 'attached class'); +is($attr->associated_class, 'Class', 'associated_class'); is($attr->predicate, 'has_pawn', 'predicate'); is($attr->clearer, 'clear_pawn', 'clearer'); ok(!$attr->is_lazy_build, "not lazy_build");