From: Richard Levitte <levitte@openssl.org>
Date: Sun, 10 Jan 2021 08:13:14 +0000 (+0100)
Subject: Configure: clean away perl syntax faults
X-Git-Tag: openssl-3.0.0-alpha11~139
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=5e16ac142e812864e01c6c534888d4efaca6d9bf;p=thirdparty%2Fopenssl.git

Configure: clean away perl syntax faults

The faults aren't fatal (i.e. perl just shrugs), but are curious.

Reviewed-by: Tomas Mraz <tmraz@fedoraproject.org>
(Merged from https://github.com/openssl/openssl/pull/13824)
---

diff --git a/Configure b/Configure
index 72829cd5836..87267e2a26e 100755
--- a/Configure
+++ b/Configure
@@ -2260,7 +2260,7 @@ EOF
                     push @{$check_exist{$s}}, $ddest;
                     my $o = $_;
                     $o =~ s/\.rc$/.res/; # Resource configuration
-                    my $o = cleanfile($buildd, $o, $blddir);
+                    $o = cleanfile($buildd, $o, $blddir);
                     $unified_info{sources}->{$ddest}->{$o} = -1;
                     $unified_info{sources}->{$o}->{$s} = -1;
                 } else {
@@ -2296,7 +2296,7 @@ EOF
                     push @{$check_exist{$s}}, $ddest;
                     my $o = $_;
                     $o =~ s/\.rc$/.res/; # Resource configuration
-                    my $o = cleanfile($buildd, $o, $blddir);
+                    $o = cleanfile($buildd, $o, $blddir);
                     $unified_info{shared_sources}->{$ddest}->{$o} = -1;
                     $unified_info{sources}->{$o}->{$s} = -1;
                 } elsif ($s =~ /\.ld$/) {