summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-10-18 12:37:28 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-10-18 12:37:28 +0000
commite33daabec7be76a5b5576db8f0b39f1e24d70e1e (patch)
tree94e59b52ea9d25c8d4474117b8639fcf1794d57c /ext
parentbb6f4497de510b4ef8ece50af67246912d14fb8e (diff)
downloadperl-e33daabec7be76a5b5576db8f0b39f1e24d70e1e.tar.gz
Wrong skip() arguments.
p4raw-id: //depot/perl@12492
Diffstat (limited to 'ext')
-rw-r--r--ext/B/t/terse.t3
1 files changed, 2 insertions, 1 deletions
diff --git a/ext/B/t/terse.t b/ext/B/t/terse.t
index 336b7a7970..281d65c113 100644
--- a/ext/B/t/terse.t
+++ b/ext/B/t/terse.t
@@ -82,7 +82,8 @@ sub bar {
SKIP: {
use Config;
- skip("- printing RVs not working under threads") if $Config{usethreads};
+ skip("- printing RVs not working under threads", 1)
+ if $Config{usethreads};
# Schwern's example of finding an RV
my $path = join " ", map { qq["-I$_"] } @INC;
my $redir = $^O eq 'MacOS' ? '' : "2>&1";