fix misleading comment on known inadequacy in B::Terse, and skip

it correctly

p4raw-id: //depot/perl@12694

diff --git a/ext/B/t/terse.t b/ext/B/t/terse.t
index 281d65c..35f5eee 100644 (file)
--- a/ext/B/t/terse.t
+++ b/ext/B/t/terse.t
@@ -82,8 +82,8 @@ sub bar {
 
 SKIP: {
     use Config;
-    skip("- printing RVs not working under threads", 1)
-       if $Config{usethreads};
+    skip("- B::Terse won't grok RVs under ithreads yet", 1)
+       if $Config{useithreads};
     # Schwern's example of finding an RV
     my $path = join " ", map { qq["-I$_"] } @INC;
     my $redir = $^O eq 'MacOS' ? '' : "2>&1";