feat: add db-pool-timeout alias

For db-pool-max-idletime
2023-05-22 18:34:18 -03:00
parent 38ad8c04e1
commit 009250006e
4 changed files with 6 additions and 4 deletions
@@ -230,7 +230,8 @@ parser optPath env dbSettings roleSettings =
    <*> (fromMaybe 10 <$> optInt "db-pool")
    <*> (fromMaybe 10 <$> optInt "db-pool-acquisition-timeout")
    <*> (fromMaybe 1800 <$> optInt "db-pool-max-lifetime")
-    <*> (fromMaybe 30 <$> optInt "db-pool-max-idletime")
+    <*> (fromMaybe 30 <$> optWithAlias (optInt "db-pool-timeout")
+                                       (optInt "db-pool-max-idletime"))
    <*> (fmap toQi <$> optWithAlias (optString "db-pre-request")
                                    (optString "pre-request"))
    <*> (fromMaybe True <$> optBool "db-prepared-statements")