@@ -699,8 +699,8 @@ data Settings = Settings
699699 { settingsPort :: Int -- ^ Port to listen on. Default value: 3000
700700 , settingsHost :: HostPreference -- ^ Default value: HostIPv4
701701 , settingsOnException :: SomeException -> IO () -- ^ What to do with exceptions thrown by either the application or server. Default: ignore server-generated exceptions (see 'InvalidRequest') and print application-generated applications to stderr.
702− , settingsOnOpen :: IO () -- ^ What to do when a connection is open
703− , settingsOnClose :: IO () -- ^ What to do when a connection is close
702+ , settingsOnOpen :: IO () -- ^ What to do when a connection is open. Default: do nothing.
703+ , settingsOnClose :: IO () -- ^ What to do when a connection is close. Default: do nothing.
704704 , settingsTimeout :: Int -- ^ Timeout value in seconds. Default value: 30
705705 , settingsIntercept :: Request -> Maybe (C.Source (ResourceT IO) S.ByteString -> Connection -> ResourceT IO ())
706706 , settingsManager :: Maybe Manager -- ^ Use an existing timeout manager instead of spawning a new one. If used, 'settingsTimeout' is ignored. Default is 'Nothing'