refactor: Remove Protolude.Conv from AppState

This commit is contained in:
monacoremo
2021-11-12 20:25:22 +01:00
committed by Remo
parent f228cccbae
commit 47b6f04a66
+2 -3
View File
@@ -39,8 +39,7 @@ import PostgREST.Config (AppConfig (..))
import PostgREST.Config.PgVersion (PgVersion (..), minimumPgVersion)
import PostgREST.DbStructure (DbStructure)
import Protolude hiding (toS)
import Protolude.Conv (toS)
import Protolude
data AppState = AppState
@@ -87,7 +86,7 @@ initWithPool newPool conf =
initPool :: AppConfig -> IO SQL.Pool
initPool AppConfig{..} =
SQL.acquire (configDbPoolSize, configDbPoolTimeout, toS configDbUri)
SQL.acquire (configDbPoolSize, configDbPoolTimeout, toUtf8 configDbUri)
getPool :: AppState -> SQL.Pool
getPool = statePool