diff --git a/src/Simplex/Messaging/Transport/Client.hs b/src/Simplex/Messaging/Transport/Client.hs index 972e4ad3a..498c81073 100644 --- a/src/Simplex/Messaging/Transport/Client.hs +++ b/src/Simplex/Messaging/Transport/Client.hs @@ -296,7 +296,10 @@ mkTLSClientParams supported caStore_ host port cafp_ clientCreds_ clientCredsSen def { T.onServerCertificate = onServerCert, T.onCertificateRequest = onCertRequest, - T.onSuggestALPN = alpn_ <$ logWarn ("ALPN: client offering " <> tshow alpn_) + T.onSuggestALPN = alpn_ <$ logWarn ("ALPN: client offering " <> tshow alpn_), + T.onCustomFFDHEGroup = \dh pub -> do + logWarn "TLS client hook onCustomFFDHEGroup" + (T.onCustomFFDHEGroup def) dh pub }, T.clientSupported = supported }