From: Ralf S. Engelschall <rse@openssl.org>
Date: Wed, 10 Mar 1999 19:51:43 +0000 (+0000)
Subject: Let util/clean-depend.pl work also with older Perl 5.00x versions.
X-Git-Tag: OpenSSL_0_9_2b~33
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=637691e6b4d66c3c4cc6331ea4d4c2a2c4b79d70;p=oweals%2Fopenssl.git

Let util/clean-depend.pl work also with older Perl 5.00x versions.

Submitted by: Matthias Loepfe <Matthias.Loepfe@adnovum.ch>
Reviewed by: Ralf S. Engelschall
---

diff --git a/CHANGES b/CHANGES
index 95a0bd28c7..b51d031a9c 100644
--- a/CHANGES
+++ b/CHANGES
@@ -5,6 +5,9 @@
 
  Changes between 0.9.1c and 0.9.2
 
+  *) Let util/clean-depend.pl work also with older Perl 5.00x versions.
+     [Matthias Loepfe <Matthias.Loepfe@adnovum.ch>]
+
   *) Fix Makefile.org so CC,CFLAG etc are passed to 'make links' add
      advapi32.lib to Win32 build and change the pem test comparision
      to fc.exe (thanks to Ulrich Kroener <kroneru@yahoo.com> for the
diff --git a/util/clean-depend.pl b/util/clean-depend.pl
index 9f775669da..7819deee4e 100755
--- a/util/clean-depend.pl
+++ b/util/clean-depend.pl
@@ -19,9 +19,11 @@ while(<STDIN>) {
     push @{$files{$file}},@deps;
 }
 
-foreach my $file (sort keys %files) {
+my $file;
+foreach $file (sort keys %files) {
     my $len=0;
-    foreach my $dep (sort @{$files{$file}}) {
+    my $dep;
+    foreach $dep (sort @{$files{$file}}) {
 	$len=0 if $len+length($dep)+1 >= 80;
 	if($len == 0) {
 	    print "\n$file:";