X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F028-subclass-attr.t;h=9a4eabab827eed16609a55c853fe99a9c314e8bf;hb=4060c871da12ba3c5e88986ed121a8254f906bd6;hp=eaeb283ff836ea9c2db501ef61d00f6fbc2240b5;hpb=069668c4fbc88fc3a347c4dbab98f031835edb75;p=gitmo%2FMouse.git

diff --git a/t/028-subclass-attr.t b/t/028-subclass-attr.t
index eaeb283..9a4eaba 100644
--- a/t/028-subclass-attr.t
+++ b/t/028-subclass-attr.t
@@ -26,10 +26,10 @@ my $obj = Child->new(class => 1, child => 1);
 ok($obj->child, "local attribute set in constructor");
 ok($obj->class, "inherited attribute set in constructor");
 
-is_deeply([Child->meta->compute_all_applicable_attributes], [
+is_deeply([sort(Child->meta->get_all_attributes)], [sort(
     Child->meta->get_attribute('child'),
     Class->meta->get_attribute('class'),
-], "correct compute_all_applicable_attributes");
+)], "correct get_all_attributes");
 
 do {
     package Foo;
@@ -61,11 +61,11 @@ is(Foo->meta->get_attribute('attr')->_is_metadata, 'ro');
 is(Bar->meta->get_attribute('attr')->default, undef);
 is(Bar->meta->get_attribute('attr')->_is_metadata, 'rw');
 
-is_deeply([Foo->meta->compute_all_applicable_attributes], [
+is_deeply([Foo->meta->get_all_attributes], [
     Foo->meta->get_attribute('attr'),
-], "correct compute_all_applicable_attributes");
+], "correct get_all_attributes");
 
-is_deeply([Bar->meta->compute_all_applicable_attributes], [
+is_deeply([Bar->meta->get_all_attributes], [
     Bar->meta->get_attribute('attr'),
-], "correct compute_all_applicable_attributes");
+], "correct get_all_attributes");