File 2286-crypto-test-Better-logging.patch of Package erlang

From f1c12926145fd0b0b31d02da7cc5fe9d741ed974 Mon Sep 17 00:00:00 2001
From: Hans Nilsson <hans@erlang.org>
Date: Tue, 12 May 2020 14:59:23 +0200
Subject: [PATCH 6/8] crypto/test: Better logging

---
 lib/crypto/test/crypto_SUITE.erl | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/lib/crypto/test/crypto_SUITE.erl b/lib/crypto/test/crypto_SUITE.erl
index d1e66afaa0..617ca9b760 100644
--- a/lib/crypto/test/crypto_SUITE.erl
+++ b/lib/crypto/test/crypto_SUITE.erl
@@ -678,17 +678,16 @@ api_ng_tls(Config) when is_list(Config) ->
     lists:foreach(fun do_api_ng_tls/1, Ciphers).
 
 
-do_api_ng_tls({Type, Key, PlainTexts}=_X) ->
-    ct:log("~p",[_X]),
+do_api_ng_tls({Type, Key, PlainTexts}) ->
     do_api_ng_tls({Type, Key, <<>>, PlainTexts});
 
-do_api_ng_tls({Type, Key, IV, PlainTexts}=_X) ->
-    ct:log("~p",[_X]),
+do_api_ng_tls({Type, Key, IV, PlainTexts}) ->
     do_api_ng_tls({Type, Key, IV, PlainTexts, undefined});
 
-do_api_ng_tls({Type, Key, IV, PlainText0, ExpectedEncText}=_X) ->
-    ct:log("~p",[_X]),
+do_api_ng_tls({Type, Key, IV, PlainText0, ExpectedEncText}) ->
     PlainText = iolist_to_binary(lazy_eval(PlainText0)),
+    ct:log("Type = ~p~nKey = ~p~nIV = ~p~nPlainText = ~p~nExpectedEncText = ~p",
+           [Type, Key, IV, PlainText, ExpectedEncText]),
     Renc = crypto:crypto_dyn_iv_init(Type, Key, true),
     Rdec = crypto:crypto_dyn_iv_init(Type, Key, false),
     EncTxt = crypto:crypto_dyn_iv_update(Renc, PlainText, IV),
-- 
2.26.1