Stay compatible to older Perl5 releases (see diff -r1.11 -r1.12).

e5b4462f · Bodo Möller · 26dc267f · e5b4462f
显示空白变更内容
内联并排

Showing with 2 addition and 1 deletion

Configure Configure +2 -1

未找到文件。
--- a/Configure
+++ b/Configure
@@ -546,7 +546,8 @@ else
 	{
 	$thread_cflags="-DTHREADS $thread_cflag $cflags";
 	$thread_defines .= "#define THREADS\n";
-	foreach my $def (split ' ',$thread_cflag)
+	my $def;
+	foreach $def (split ' ',$thread_cflag)
 		{
 		if ($def =~ s/^-D//)
 			{