perl-IO-Socket-SSL/IO-Socket-SSL-1.980-openssl-version.patch

23 lines
913 B
Diff
Raw Normal View History

--- lib/IO/Socket/SSL.pm
+++ lib/IO/Socket/SSL.pm
@@ -44,7 +44,7 @@ BEGIN {
$can_ecdh = defined &Net::SSLeay::CTX_set_tmp_ecdh &&
# There is a regression with elliptic curves on 1.0.1d with 64bit
# http://rt.openssl.org/Ticket/Display.html?id=2975
- ( Net::SSLeay::OPENSSL_VERSION_NUMBER() != 0x1000105f
+ ( Net::SSLeay::OPENSSL_VERSION_NUMBER() != 0x1000104f
|| length(pack("P",0)) == 4 );
}
--- t/ecdhe.t
+++ t/ecdhe.t
@@ -16,7 +16,7 @@ if ( grep { $^O =~m{$_} } qw( MacOS VOS
if ( ! defined &Net::SSLeay::CTX_set_tmp_ecdh || !
# There is a regression with elliptic curves on 1.0.1d with 64bit
# http://rt.openssl.org/Ticket/Display.html?id=2975
- ( Net::SSLeay::OPENSSL_VERSION_NUMBER() != 0x1000105f
+ ( Net::SSLeay::OPENSSL_VERSION_NUMBER() != 0x1000104f
|| length(pack("P",0)) == 4 )) {
print "1..0 # Skipped: no support for ecdh with this openssl/Net::SSLeay\n";
exit