disable http2

This commit is contained in:
Lucy Cifferello
2021-07-06 15:08:48 -04:00
committed by Keagan McClelland
parent 9e9ece45f8
commit 1aaab34633

View File

@@ -34,7 +34,7 @@ import Database.Persist.Postgresql (createPostgresqlPool, pg
import Language.Haskell.TH.Syntax (qLocation)
import Network.Wai
import Network.Wai.Handler.Warp (Settings, defaultSettings, defaultShouldDisplayException,
getPort, setHost, setOnException, setPort, runSettings)
getPort, setHost, setOnException, setPort, runSettings, setHTTP2Disabled)
import Network.Wai.Handler.WarpTLS
import Network.Wai.Middleware.AcceptOverride
import Network.Wai.Middleware.Autohead
@@ -218,7 +218,7 @@ warpSettings port foundation =
"yesod"
LevelError
(toLogStr $ "Exception from Warp: " ++ show e))
defaultSettings
(setHTTP2Disabled defaultSettings)
getAppSettings :: IO AppSettings
getAppSettings = loadYamlSettings [configSettingsYml] [] useEnv