aboutsummaryrefslogtreecommitdiffstats
path: root/app/Settings.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/Settings.hs')
-rw-r--r--app/Settings.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/app/Settings.hs b/app/Settings.hs
index 116a3d2..c439b65 100644
--- a/app/Settings.hs
+++ b/app/Settings.hs
@@ -7,8 +7,10 @@ where
import Data.Aeson qualified as A
import Data.Yaml (decodeFileThrow)
import GHC.Generics (Generic)
+import Git qualified
import System.Directory (doesFileExist)
import System.Environment.XDG.BaseDir (getSystemConfigFiles, getUserConfigFile)
+import System.FilePath ((</>))
data Settings = Settings
{
@@ -38,6 +40,5 @@ readSettings =
<$> sequence
[ getSystemConfigFiles "anissue" "settings.yaml",
((: []) <$> getUserConfigFile "anissue" "settings.yaml"),
- -- TODO Read settings from Git base dir
- pure ["./anissue.yaml"]
+ ((: []) . (</> "anissue.yaml")) <$> Git.getRootDir
]