perl-Protocol-HTTP2/openssl3_1-adapt_tests.patch

32 lines
1.0 KiB
Diff

From 552e3677372c77ec458548fd8c3fdc280e493d91 Mon Sep 17 00:00:00 2001
From: Otto Hollmann <otto.hollmann@suse.com>
Date: Thu, 4 May 2023 13:42:51 +0200
Subject: [PATCH] Adapt tests for OpenSSL 3.1
---
t/lib/PH2ClientServerTest.pm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/t/lib/PH2ClientServerTest.pm b/t/lib/PH2ClientServerTest.pm
index 3fe9203..fe90f32 100644
--- a/t/lib/PH2ClientServerTest.pm
+++ b/t/lib/PH2ClientServerTest.pm
@@ -43,7 +43,7 @@ sub server {
if ( !$h{upgrade} && ( $h{npn} || $h{alpn} ) ) {
eval {
$tls = AnyEvent::TLS->new(
- method => 'tlsv1',
+ method => 'tlsv1_2',
cert_file => $tls_crt,
key_file => $tls_key,
);
@@ -122,7 +122,7 @@ sub client {
}
elsif ( $h{npn} || $h{alpn} ) {
eval {
- $tls = AnyEvent::TLS->new( method => 'tlsv1', );
+ $tls = AnyEvent::TLS->new( method => 'tlsv1_2', );
if ( delete $h{npn} ) {