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

2000-02-18 11:35:10 +00:00 · 2000-02-18 11:35:10 +00:00 · e5b4462f47
parent 26dc267f8c
commit e5b4462f47
1 changed files with 2 additions and 1 deletions
--- a/3
+++ b/3
@ -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//)
 			{