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

misc realignement

Browse source
This commit is contained in:
Vincent Hanquez 2014-01-27 03:50:20 +00:00
parent ad6ed6beac
commit c6117b96f3
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
core/Network/TLS/Parameters.hs
View file

@ -233,8 +233,8 @@ defaultServerHooks = ServerHooks
{ onCipherChoosing = \_ -> head
, onClientCertificate = \_ -> return $ CertificateUsageReject $ CertificateRejectOther "no client certificates expected"
, onUnverifiedClientCert = return False
, onSuggestNextProtocols = return Nothing
, onNewHandshake = \_ -> return True
, onSuggestNextProtocols = return Nothing
, onNewHandshake = \_ -> return True
}
instance Show ServerHooks where