X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F100-meta-class.t;h=8e3ee3106567845b34ecb8d88844688ab385581f;hp=66ffb9dffc608e59af55d49b971a062ee4f5a5c7;hb=306290e864ac23e5f1692c8495b0c173081a1ebb;hpb=58af95b87869e95b132806405054324491903fa1 diff --git a/t/100-meta-class.t b/t/100-meta-class.t index 66ffb9d..8e3ee31 100644 --- a/t/100-meta-class.t +++ b/t/100-meta-class.t @@ -16,7 +16,7 @@ do { }; my $meta = Class->meta; -isa_ok($meta, 'Mouse::Class'); +isa_ok($meta, 'Mouse::Meta::Class'); is_deeply([$meta->superclasses], ['Mouse::Object'], "correctly inherting from Mouse::Object"); @@ -26,7 +26,7 @@ is($meta, $meta2, "same metaclass instance"); can_ok($meta, 'name', 'get_attribute_map'); my $attr = $meta->get_attribute('pawn'); -isa_ok($attr, 'Mouse::Attribute'); +isa_ok($attr, 'Mouse::Meta::Attribute'); is($attr->name, 'pawn', 'got the correct attribute'); my $map = $meta->get_attribute_map; @@ -50,7 +50,7 @@ do { }; my $child_meta = Child->meta; -isa_ok($child_meta, 'Mouse::Class'); +isa_ok($child_meta, 'Mouse::Meta::Class'); isnt($meta, $child_meta, "different metaclass instances for the two classes");