From 9d0cbb1703114140cf940ac6e3f4a3e9b730d40e Mon Sep 17 00:00:00 2001 From: stuebinm Date: Sat, 28 Jan 2023 21:09:44 +0100 Subject: yaml be imprecise & confusing --- app/Main.hs | 3 +++ 1 file changed, 3 insertions(+) diff --git a/app/Main.hs b/app/Main.hs index 7d0e41a..a61140a 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -34,6 +34,9 @@ main = do >>= (\c -> ifM (doesFileExist "./config.yaml") (addSource (ConfYaml.fromFilePath "./config.yaml") c) (pure c)) + >>= (\c -> ifM (doesFileExist "./config.yml") + (addSource (ConfYaml.fromFilePath "./config.yml") c) + (pure c)) >>= addSource (ConfAeson.fromFilePath "./config.json") settings@ServerConfig{..} <- fetch confconfig -- cgit v1.2.3