From 95d71281d6eb9ed59f901b343e1c8eceb0cb8cd3 Mon Sep 17 00:00:00 2001 From: Robert Date: Tue, 14 Feb 2023 17:09:48 +0100 Subject: [PATCH] refactor: fix inaccurate variable name (#2662) --- src/PostgREST/AppState.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/PostgREST/AppState.hs b/src/PostgREST/AppState.hs index 5cf392464..a627b0b86 100644 --- a/src/PostgREST/AppState.hs +++ b/src/PostgREST/AppState.hs @@ -97,9 +97,9 @@ destroy = destroyPool initPool :: AppConfig -> IO SQL.Pool initPool AppConfig{..} = - SQL.acquire configDbPoolSize timeoutMilliseconds $ toUtf8 configDbUri + SQL.acquire configDbPoolSize timeoutMicroseconds $ toUtf8 configDbUri where - timeoutMilliseconds = (* oneSecond) <$> configDbPoolAcquisitionTimeout + timeoutMicroseconds = (* oneSecond) <$> configDbPoolAcquisitionTimeout oneSecond = 1000000 -- | Run an action with a database connection.