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

allow SSL3 in stunnel

Browse source
This commit is contained in:
Vincent Hanquez 2010-12-14 23:26:51 +00:00
parent 18cf6a5392
commit 3020ba5c28
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Stunnel.hs
View file

@ -84,7 +84,7 @@ clientProcess ((certdata, cert), pk) handle dsthandle _ = do
rng <- getRandomGen
let serverstate = S.TLSServerParams
{ S.spAllowedVersions = [TLS10,TLS11]
{ S.spAllowedVersions = [SSL3,TLS10,TLS11]
, S.spSessions = []
, S.spCiphers = ciphers
, S.spCertificate = Just (certdata, cert, pk)