X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=t%2Flib%2Findirect%2FTestThreads.pm;h=1b6c6daefbae5963e85c7fdfb072b81d6b4c720a;hp=8a93dcabf559e4d37375e09b2a0d47f953b2bb86;hb=76861cbb848c770203b09f413c9c65ca58c808c8;hpb=465ffc1ca18d6d7c5400706e1d37abab009f7d70

diff --git a/t/lib/indirect/TestThreads.pm b/t/lib/indirect/TestThreads.pm
index 8a93dca..1b6c6da 100644
--- a/t/lib/indirect/TestThreads.pm
+++ b/t/lib/indirect/TestThreads.pm
@@ -18,10 +18,9 @@ sub import {
  skip_all 'This perl wasn\'t built to support threads'
                                                     unless $Config{useithreads};
  skip_all 'perl 5.13.4 required to test thread safety'
-                                              unless $force or "$]" >= 5.013004;
+                                             unless $force or "$]" >= 5.013_004;
 
- load_or_skip('threads', $force ? '0' : '1.67', [ ],
-              'required to test thread safety');
+ load_or_skip_all('threads', $force ? '0' : '1.67', [ ]);
 
  my %exports = (
   spawn => \&spawn,