Mark tests as TODO

[gitmo/Moose.git] / t / 600_todo_tests / 008_moose_nonmoose_moose_chain_extends.t

diff --git a/t/600_todo_tests/008_moose_nonmoose_moose_chain_extends.t b/t/600_todo_tests/008_moose_nonmoose_moose_chain_extends.t
index 5aef147..8f0b62d 100644 (file)
--- a/t/600_todo_tests/008_moose_nonmoose_moose_chain_extends.t
+++ b/t/600_todo_tests/008_moose_nonmoose_moose_chain_extends.t
@@ -17,9 +17,13 @@ use Test::More tests => 1;
 {
     package SubSubClassUseBase;
     use Moose;
+    use Test::More;
     use Test::Exception;
-    lives_ok {
-        extends 'SubClassUseBase';
-    } 'Can extend non-moose class whos parent class is a Moose class with a meta role';
+    TODO: {
+        local $TODO = 'Metaclass incompatibility';
+        lives_ok {
+            extends 'SubClassUseBase';
+        } 'Can extend non-moose class whos parent class is a Moose class with a meta role';
+    }
 }