The first big import towards 5.8.1, @18078. Please do NOT

[perl5.git] / lib / Test / Simple / t / threads.t

diff --git a/lib/Test/Simple/t/threads.t b/lib/Test/Simple/t/threads.t
index 4212ccc..5670bda 100644 (file)
--- a/lib/Test/Simple/t/threads.t
+++ b/lib/Test/Simple/t/threads.t
@@ -8,7 +8,7 @@ BEGIN {
 }
 
 use Config;
-unless ($Config{'useithreads'}) {
+unless ($Config{'useithreads'} and eval { require threads; 1 }) {
     print "1..0 # Skip: no threads\n";
     exit 0;
 }