summaryrefslogtreecommitdiff
path: root/dist/Thread-Queue/t/05_extract.t
diff options
context:
space:
mode:
Diffstat (limited to 'dist/Thread-Queue/t/05_extract.t')
-rw-r--r--dist/Thread-Queue/t/05_extract.t2
1 files changed, 2 insertions, 0 deletions
diff --git a/dist/Thread-Queue/t/05_extract.t b/dist/Thread-Queue/t/05_extract.t
index de0e78bfd0..823bd0cc94 100644
--- a/dist/Thread-Queue/t/05_extract.t
+++ b/dist/Thread-Queue/t/05_extract.t
@@ -12,12 +12,14 @@ BEGIN {
use threads;
use Thread::Queue;
+BEGIN { # perl RT 133382
if ($] == 5.008) {
require 't/test.pl'; # Test::More work-alike for Perl 5.8.0
} else {
require Test::More;
}
Test::More->import();
+} # end BEGIN
plan('tests' => 20);
my $q = Thread::Queue->new(1..10);