This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add thread-safe locale handling
[perl5.git] / dist / Exporter / t / warn.t
index 49a109c..3010964 100644 (file)
@@ -34,6 +34,6 @@ package main;
 
     local $SIG{__WARN__} = sub { push @warn, join "", @_ };
     eval { Foo->import(":quux") };
-    ok(grep(/"quux" is not defined/, @warn), "# TODO warnings captured");
+    ok(grep(/"quux" is not defined/, @warn), "warnings captured");
 }