yogsototh/hs-tls
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix client hello relative to the new deprecated record field.

Browse source
This commit is contained in:
Vincent Hanquez 2012-12-04 08:56:15 +00:00
parent 8b022c48e9
commit c0bdb30482
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
debug/src/CheckCiphers.hs
View file

@ -82,7 +82,7 @@ fakeCipher cid = Cipher
, cipherMinVer = Nothing
}
clienthello ciphers = ClientHello TLS10 (ClientRandom $ B.pack [0..31]) (Session Nothing) ciphers [0] []
clienthello ciphers = ClientHello TLS10 (ClientRandom $ B.pack [0..31]) (Session Nothing) ciphers [0] [] Nothing
openConnection :: String -> String -> [Word16] -> IO (Maybe Word16)
openConnection s p ciphers = do