TODOify rbuels's failing test, see [rt.cpan.org #47350]

[gitmo/Moose.git] / t / 010_basics / 021_attr_override_method_warning.t

diff --git a/t/010_basics/021_attr_override_method_warning.t b/t/010_basics/021_attr_override_method_warning.t
index 61dd021..e86ad30 100644 (file)
--- a/t/010_basics/021_attr_override_method_warning.t
+++ b/t/010_basics/021_attr_override_method_warning.t
@@ -16,6 +16,8 @@ sub foo { 'omglolbbq' }
 package main;
 EOP
 
-is( scalar(@warnings), 1, 'got 1 warning' );
-like( $warnings[0], qr/\bfoo\b.+redefine/, 'got a redefinition warning that mentions redefining or overriding or something');
-
+TODO: {
+    local $TODO = "Class-MOP does not warn about this yet";
+    is( scalar(@warnings), 1, 'got 1 warning' );
+    like( $warnings[0], qr/\bfoo\b.+redefine/, 'got a redefinition warning that mentions redefining or overriding or something');
+}