X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/d35ff3b6dcd801b010e079076e9dae5b7911e010..1b48ba24c0ad545b5b9a86a58e4289964f1dc105:/t/uni/universal.t?ds=sidebyside

diff --git a/t/uni/universal.t b/t/uni/universal.t
index c53f853..8f158e9 100644
--- a/t/uni/universal.t
+++ b/t/uni/universal.t
@@ -51,17 +51,11 @@ package main;
 $a = nèw Àlìcè;
 
 ok $a->isa("Àlìcè");
-TODO: {
-    local $TODO = "mro";
-    ok $a->isa("main::Àlìcè");    # check that alternate class names work
-}
+ok $a->isa("main::Àlìcè");    # check that alternate class names work
 ok(("main::Àlìcè"->nèw)->isa("Àlìcè"));
 
 ok $a->isa("Bòb");
-TODO: {
-    local $TODO = "mro";
-    ok $a->isa("main::Bòb");
-}
+ok $a->isa("main::Bòb");
 
 ok $a->isa("Fèmàlè");