Also the lib/Thread.pm itself needs to be ignored if

the Thread extension hasn't been built.

p4raw-id: //depot/perl@8523

diff --git a/t/lib/1_compile.t b/t/lib/1_compile.t
index 3613639..1394443 100644 (file)
--- a/t/lib/1_compile.t
+++ b/t/lib/1_compile.t
@@ -43,7 +43,10 @@ delete_by_prefix('ExtUtils::MM_');   # ExtUtils::MakeMaker's domain
 delete_by_prefix('File::Spec::');      # File::Spec's domain
 $Core_Modules{'File::Spec::Functions'}++;      # put this back
 
-delete_by_prefix('Thread::') unless $Config{extensions} =~ /\bThread\b/;
+unless ($Config{extensions} =~ /\bThread\b/) {
+    delete $Core_Modules{Thread};
+    delete_by_prefix('Thread::')++;
+}
 
 delete_by_prefix('unicode::');
 $Core_Modules{'unicode::distinct'}++;  # put this back