From 43ebbc5e6705d2cf86650f1918e28b9b7e94406d Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Wed, 9 Aug 2023 20:59:42 +0200 Subject: Use TOML configuration --- app/SlackBuilder/Config.hs | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 app/SlackBuilder/Config.hs (limited to 'app/SlackBuilder/Config.hs') diff --git a/app/SlackBuilder/Config.hs b/app/SlackBuilder/Config.hs new file mode 100644 index 0000000..be91ae0 --- /dev/null +++ b/app/SlackBuilder/Config.hs @@ -0,0 +1,16 @@ +module SlackBuilder.Config + ( Settings(..) + , settingsCodec + ) where + +import Data.Text (Text) +import Toml ((.=)) +import qualified Toml + +newtype Settings = Settings + { ghToken :: Text + } deriving (Eq, Show) + +settingsCodec :: Toml.TomlCodec Settings +settingsCodec = Settings + <$> Toml.text "gh_token" .= ghToken -- cgit v1.2.3