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 ic...@apache.org on 2018/11/05 10:10:51 UTC
svn commit: r1845766 - /perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm
Author: icing
Date: Mon Nov 5 10:10:51 2018
New Revision: 1845766
URL: http://svn.apache.org/viewvc?rev=1845766&view=rev
Log:
Changed the openssl version detection to work with other *SSL libraries.
Version detection now FATALs hard rather than assume it's some 0.* fossil when version cannot be determined.
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=1845766&r1=1845765&r2=1845766&view=diff
==============================================================================
--- perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm (original)
+++ perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm Mon Nov 5 10:10:51 2018
@@ -573,8 +573,8 @@ sub gendir {
sub version {
my $version = qx($openssl version);
- return $1 if $version =~ /^OpenSSL (\S+) /;
- return 0;
+ return $1 if $version =~ /^\S+SSL (\S+)/;
+ die "FATAL: unable to determine openssl version via `$openssl version` from: $version";
}
sub dgst {