diff --git a/Network/TLS/Struct.hs b/Network/TLS/Struct.hs index c9ab9a8..13bc582 100644 --- a/Network/TLS/Struct.hs +++ b/Network/TLS/Struct.hs @@ -240,8 +240,8 @@ data Handshake = | ServerHelloDone | ClientKeyXchg Bytes | ServerKeyXchg ServerKeyXchgAlgorithmData - | CertRequest [CertificateType] (Maybe [ (HashAlgorithm, SignatureAlgorithm) ]) [DistinguishedName] - | CertVerify (Maybe (HashAlgorithm, SignatureAlgorithm)) CertVerifyData + | CertRequest [CertificateType] (Maybe [ HashAndSignatureAlgorithm ]) [DistinguishedName] + | CertVerify (Maybe HashAndSignatureAlgorithm) CertVerifyData | Finished FinishedData | HsNextProtocolNegotiation Bytes -- NPN extension deriving (Show,Eq)