File 0211-ssl-Correct-translation-of-OpenSSL-legacy-names-for-.patch of Package erlang

From 3d19ab91f523bda579b62f75cd0e63b8abad0912 Mon Sep 17 00:00:00 2001
From: Ingela Anderton Andin <ingela@erlang.org>
Date: Mon, 23 Mar 2020 12:13:08 +0100
Subject: [PATCH] ssl: Correct translation of OpenSSL legacy names for two
 legacy cipher suites

---
 lib/ssl/src/ssl_cipher_format.erl | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/lib/ssl/src/ssl_cipher_format.erl b/lib/ssl/src/ssl_cipher_format.erl
index c3159d1e29..e42f0b817b 100644
--- a/lib/ssl/src/ssl_cipher_format.erl
+++ b/lib/ssl/src/ssl_cipher_format.erl
@@ -1848,11 +1848,17 @@ openssl_suite_start(Kex) ->
 
 openssl_kex_name("RSA") ->
     "";
+openssl_kex_name("DHE_RSA") ->
+    "EDH-RSA";
 openssl_kex_name(Kex) ->
     lists:append(string:replace(Kex, "_", "-", all)).
-
 kex_name_from_openssl(Kex) ->
-    lists:append(string:replace(Kex, "-", "_", all)).
+    case lists:append(string:replace(Kex, "-", "_", all)) of
+        "EDH_RSA" ->
+            "DHE_RSA"; 
+        Str  ->
+            Str
+    end.
 
 cipher_name_from_openssl("AES128") ->
     "AES_128_CBC";
-- 
2.16.4