File 0543-Try-fixing-on-very-old-openssl-versions-as-per-revie.patch of Package erlang

From 0ab0e90e489f307fe036b7f240c74785a1444572 Mon Sep 17 00:00:00 2001
From: Nelson Vides <videsnelson@gmail.com>
Date: Mon, 19 Apr 2021 10:17:46 +0200
Subject: [PATCH 3/6] Try fixing on very old openssl versions as per review

---
 lib/ssl/test/ssl_api_SUITE.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/ssl/test/ssl_api_SUITE.erl b/lib/ssl/test/ssl_api_SUITE.erl
index 03f937c126..b1fffdcb06 100644
--- a/lib/ssl/test/ssl_api_SUITE.erl
+++ b/lib/ssl/test/ssl_api_SUITE.erl
@@ -2654,7 +2654,7 @@ connection_info_result(Socket) ->
 prf_create_plan(TlsVer, _PRFs, Results) when TlsVer == sslv3 orelse TlsVer == tlsv1
                                              orelse TlsVer == 'tlsv1.1'
                                              orelse TlsVer == 'dtlsv1' ->
-    Ciphers = ssl:cipher_suites(default, TlsVer),
+    Ciphers = ssl:cipher_suites(all, TlsVer),
     {_, Expected} = lists:keyfind(md5sha, 1, Results),
     [[{ciphers, Ciphers}, {expected, Expected}, {prf, md5sha}]];
 prf_create_plan(TlsVer, PRFs, Results) when TlsVer == 'tlsv1.2' orelse TlsVer == 'dtlsv1.2' ->
@@ -2680,10 +2680,10 @@ prf_get_ciphers(TlsVer, PRF) ->
                                 false
                         end
                 end,
-    ssl:filter_cipher_suites(ssl:cipher_suites(default, TlsVer), [{prf, PrfFilter}]).
+    ssl:filter_cipher_suites(ssl:cipher_suites(all, TlsVer), [{prf, PrfFilter}]).
 
 prf_run_test(_, TlsVer, [], _, Prf) ->
-    ct:fail({error, cipher_list_empty, TlsVer, Prf});
+    ct:comment(lists:flatten(io_lib:format("cipher_list_empty Ver: ~p  PRF: ~p", [TlsVer, Prf])));
 prf_run_test(Config, TlsVer, Ciphers, Expected, Prf) ->
     {ClientNode, ServerNode, Hostname} = ssl_test_lib:run_where(Config),
     BaseOpts = [{active, true}, {versions, [TlsVer]}, {ciphers, Ciphers}, {protocol, tls_or_dtls(TlsVer)}],
-- 
2.26.2