From d4950c646036afb36470e546c38dd38356a62441 Mon Sep 17 00:00:00 2001
From: Robert Vollmert <rob@vllmrt.net>
Date: Mon, 1 Aug 2022 11:38:26 +0200
Subject: [PATCH] refactor: drop getPool

---
 src/PostgREST/AppState.hs | 4 ----
 1 file changed, 4 deletions(-)

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