File 4561-ssh-fail-if-OpenSSH-generates-PQC-warning.patch of Package erlang

From 77e986def974a0c23960b90390ff3da028acb82b Mon Sep 17 00:00:00 2001
From: Jakub Witczak <kuba@erlang.org>
Date: Mon, 26 Jan 2026 09:05:05 +0100
Subject: [PATCH 1/4] ssh: fail if OpenSSH generates PQC warning

---
 lib/ssh/test/ssh_to_openssh_SUITE.erl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lib/ssh/test/ssh_to_openssh_SUITE.erl b/lib/ssh/test/ssh_to_openssh_SUITE.erl
index 56b5053452..4e14e55f33 100644
--- a/lib/ssh/test/ssh_to_openssh_SUITE.erl
+++ b/lib/ssh/test/ssh_to_openssh_SUITE.erl
@@ -308,7 +308,6 @@ eserver_oclient_renegotiate_helper1(Config) ->
                                       " -o StrictHostKeyChecking=no"
                                       " -o ServerAliveCountMax=3"
                                       " -o ServerAliveInterval=100"
-                                      " -q"
                                       " -x",
                                       " -o RekeyLimit=",integer_to_list(RenegLimitK),"K"]),
 
@@ -318,6 +317,12 @@ eserver_oclient_renegotiate_helper1(Config) ->
 
 eserver_oclient_renegotiate_helper2({Data, OpenSsh, Pid}) ->
     Expect = fun({data,R}) ->
+                     case binary:match(R, <<"post-quantum">>) of
+                         nomatch -> ok;
+                         _ ->
+                             ?CT_PAL("~p", [R]),
+                             ct:fail(pqc_warning_detected)
+                     end,
 		     try
 			 NonAlphaChars = [C || C<-lists:seq(1,255),
 					       not lists:member(C,lists:seq($a,$z)),
-- 
2.51.0