The TODO tests of change 33876 were actually fixed by change 33874.

p4raw-id: //depot/perl@33890

diff --git a/t/lib/strict/subs b/t/lib/strict/subs
index 2c9aa87..c18af68 100644 (file)
--- a/t/lib/strict/subs
+++ b/t/lib/strict/subs
@@ -394,14 +394,14 @@ EXPECT
 Bareword "FOO" not allowed while "strict subs" in use at - line 2.
 Execution of - aborted due to compilation errors.
 ########
-# TODO: [perl #53806] No complain about bareword
+# [perl #53806] No complain about bareword
 use strict 'subs';
 print FOO . "\n";
 EXPECT
 Bareword "FOO" not allowed while "strict subs" in use at - line 3.
 Execution of - aborted due to compilation errors.
 ########
-# TODO: [perl #53806] No complain about bareword
+# [perl #53806] No complain about bareword
 use strict 'subs';
 $ENV{PATH} = "";
 system(FOO . "\n");