Rewording.

p4raw-id: //depot/cfgperl@5657

diff --git a/t/pragma/warn/pp_hot b/t/pragma/warn/pp_hot
index dc99694..baa9f1f 100644 (file)
--- a/t/pragma/warn/pp_hot
+++ b/t/pragma/warn/pp_hot
@@ -62,12 +62,11 @@ print <STDERR>;
 open(FOO, ">&STDOUT") and print <FOO>;
 print getc(STDERR);
 print getc(FOO);
-#####################################################################
-# The next test is known to fail on some systems (Linux+glibc, *BSD #
-# NeXT among others.  glibc and FreeBSD have been fixed, but it     #
-# appears other platforms have little hope.  We skip it for now (on #
-# the grounds that it is "just" a warning).                         #
-#####################################################################
+####################################################################
+# The next test is known to fail on some systems (Linux+old glibc, #
+# old *BSDs, and NeXT, among others.                               #
+# We skip it for now (on the grounds that it is "just" a warning). #
+####################################################################
 #read(FOO,$_,1);
 no warnings 'io' ;
 print STDIN "anc";