diff --git a/src/PostgREST/AppState.hs b/src/PostgREST/AppState.hs index cca6f526f..55b6e51b3 100644 --- a/src/PostgREST/AppState.hs +++ b/src/PostgREST/AppState.hs @@ -9,7 +9,6 @@ module PostgREST.AppState , getJsonDbS , getMainThreadId , getPgVersion - , getPool , getTime , getRetryNextIn , init @@ -95,9 +94,6 @@ initPool :: AppConfig -> IO SQL.Pool initPool AppConfig{..} = SQL.acquire (configDbPoolSize, configDbPoolTimeout, toUtf8 configDbUri) -getPool :: AppState -> SQL.Pool -getPool = statePool - usePool :: AppState -> SQL.Session a -> IO (Either SQL.UsageError a) usePool AppState{..} = SQL.use statePool