improvement the compatibility with Moose.

[gitmo/Mouse.git] / t / 034-apply_all_roles.t

diff --git a/t/034-apply_all_roles.t b/t/034-apply_all_roles.t
index b36ea2d..c2979ef 100644 (file)
--- a/t/034-apply_all_roles.t
+++ b/t/034-apply_all_roles.t
@@ -30,5 +30,5 @@ Mouse::Util::apply_all_roles('Baz', 'FooRole');
 my $baz = Baz->new;
 is $baz->foo, 'ok1';
 is $baz->bar, 'ok2';
-is join(",", sort $baz->meta->get_method_list), 'bar,foo';
+is join(",", sort $baz->meta->get_method_list), 'bar,foo,meta';