You are viewing a plain text version of this content. The canonical link for it is here.

Posted to test-commits@perl.apache.org by rj...@apache.org on 2020/08/04 21:04:43 UTC

svn commit: r1880584 - /perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm

Author: rjung
Date: Tue Aug  4 21:04:42 2020
New Revision: 1880584

URL: http://svn.apache.org/viewvc?rev=1880584&view=rev
Log:
Fix hash generation when the openssl command
was overwritten with the environment variable
"APACHE_TEST_OPENSSL_CMD".

Modified:
    perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm

Modified: perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm
URL: http://svn.apache.org/viewvc/perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm?rev=1880584&r1=1880583&r2=1880584&view=diff
==============================================================================
--- perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm (original)
+++ perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm Tue Aug  4 21:04:42 2020
@@ -423,7 +423,7 @@ sub hash_certs {
 
     for my $file ($dh->read) {
         next unless $file =~ /\.cr[tl]$/;
-        chomp(my $hash = `openssl $type -noout -hash < $file`);
+        chomp(my $hash = `$openssl $type -noout -hash < $file`);
         next unless $hash;
         my $symlink = "$hash.r$n";
         $n++;