release 0.3.0

vincenthz · Apr 22, 2019 · 8ce3b79 · 8ce3b79
1 parent 3edcf94
commit 8ce3b79
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/Network/Connection.hs b/Network/Connection.hs
@@ -47,9 +47,9 @@ module Network.Connection
     -- * TLS related operation
     , connectionSetSecure
     , connectionIsSecure
+    , connectionSessionManager
     ) where
 
-import Control.Applicative
 import Control.Concurrent.MVar
 import Control.Monad (join)
 import qualified Control.Exception as E
@@ -111,7 +111,7 @@ initConnectionContext = ConnectionContext <$> getSystemCertificateStore
 makeTLSParams :: ConnectionContext -> ConnectionID -> TLSSettings -> TLS.ClientParams
 makeTLSParams cg cid ts@(TLSSettingsSimple {}) =
     (TLS.defaultParamsClient (fst cid) portString)
-        { TLS.clientSupported = def { TLS.supportedCiphers = TLS.ciphersuite_all }
+        { TLS.clientSupported = def { TLS.supportedCiphers = TLS.ciphersuite_default }
         , TLS.clientShared    = def
             { TLS.sharedCAStore         = globalCertificateStore cg
             , TLS.sharedValidationCache = validationCache