Better linear-isa tests (using the meta API)
[gitmo/Mouse.git] / t / 800_shikabased / 011-util-linear-isa.t
index 2d2663d..c556b79 100644 (file)
@@ -1,10 +1,10 @@
 use strict;
 use warnings;
-use Mouse::Util 'get_linear_isa';
 use Test::More tests => 2;
 
 {
     package Parent;
+    use Mouse;
 }
 
 {
@@ -13,6 +13,6 @@ use Test::More tests => 2;
     extends 'Parent';
 }
 
-is_deeply get_linear_isa('Parent'), [ 'Parent' ];
-is_deeply get_linear_isa('Child'),  [ 'Child', 'Parent' ];
+is_deeply join(', ', Parent->meta->linearized_isa), 'Parent, Mouse::Object';
+is_deeply join(', ', Child->meta->linearized_isa),  'Child, Parent, Mouse::Object';