@@ -84,7 +84,23 @@ data TLSSettings = TLSSettings {
85 -- Since 1.4.2
85 -- Since 1.4.2
86 , tlsWantClientCert :: Bool
86 , tlsWantClientCert :: Bool
87+ -- ^ Whether or not to demand a certificate from the client. If this
88+ -- is set to True, you must handle received certificates in a server hook
89+ -- or all connections will fail.
92+ , tlsServerHooks :: TLS.ServerHooks
93+ -- ^ Whether or not to demand a certificate from the client. If this
94+ -- is set to True, you must handle received certificates in a server hook
95+ -- or all connections will fail.
87 , tlsServerHooks :: TLS.ServerHooks
98 , tlsServerHooks :: TLS.ServerHooks
99+ -- ^ The server-side hooks called by the tls package, including actions
100+ -- to take when a client certificate is received. See the "Network.TLS"
101+ -- module for details.
90-- | Default 'TLSSettings'. Use this to create 'TLSSettings' with the field record name.
106-- | Default 'TLSSettings'. Use this to create 'TLSSettings' with the field record name.