DSA cert is not generated anymore.

haskell-tls · Jan 17, 2024 · 52fa63a · 52fa63a
1 parent 9b753dc
commit 52fa63a
Showing 1 changed file with 1 addition and 4 deletions.
diff --git a/core/test/HandshakeSpec.hs b/core/test/HandshakeSpec.hs
@@ -452,10 +452,7 @@ handshake_client_auth (clientParam, serverParam) = do
                         { onClientCertificate = validateChain cred
                         }
                 }
-    let shouldFail = version == TLS13 && isCredentialDSA cred
-    if shouldFail
-        then runTLSFailure (clientParam', serverParam') handshake handshake
-        else runTLSSimple (clientParam', serverParam')
+    runTLSSimple (clientParam', serverParam')
   where
     validateChain cred chain
         | chain == fst cred = return CertificateUsageAccept