De-cut-and-pasto.

p4raw-id: //depot/perl@8530

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