@@ -89,12 +89,16 @@ data TLSSettings = TLSSettings {
89 -- or all connections will fail.
89 -- or all connections will fail.
91 -- Default: False
91 -- Default: False
92 , tlsServerHooks :: TLS.ServerHooks
94 , tlsServerHooks :: TLS.ServerHooks
93 -- ^ The server-side hooks called by the tls package, including actions
95 -- ^ The server-side hooks called by the tls package, including actions
94 -- to take when a client certificate is received. See the "Network.TLS"
96 -- to take when a client certificate is received. See the "Network.TLS"
95 -- module for details.
97 -- module for details.
97 -- Default: def
99 -- Default: def
100-- | Default 'TLSSettings'. Use this to create 'TLSSettings' with the field record name.
104-- | Default 'TLSSettings'. Use this to create 'TLSSettings' with the field record name.