diff options
| author | Eugen Wissner <belka@caraus.de> | 2023-08-15 10:33:19 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2023-08-15 10:33:19 +0200 |
| commit | 6b15ccd0f53c7ffd57820fb15664ecadee74392a (patch) | |
| tree | 20ba7c838a2be1e7bd0707ed098f505c43a4da79 /app/SlackBuilder/Config.hs | |
| parent | 5a9e87cd5f65439ef8f2717b3b3e561f42f2e24c (diff) | |
| download | slackbuilder-6b15ccd0f53c7ffd57820fb15664ecadee74392a.tar.gz | |
Support repository path in commits
Diffstat (limited to 'app/SlackBuilder/Config.hs')
| -rw-r--r-- | app/SlackBuilder/Config.hs | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/app/SlackBuilder/Config.hs b/app/SlackBuilder/Config.hs index be91ae0..6e093a7 100644 --- a/app/SlackBuilder/Config.hs +++ b/app/SlackBuilder/Config.hs @@ -7,10 +7,14 @@ import Data.Text (Text) import Toml ((.=)) import qualified Toml -newtype Settings = Settings - { ghToken :: Text +data Settings = Settings + { ghToken :: !Text + , repository :: !FilePath + , branch :: Text } deriving (Eq, Show) settingsCodec :: Toml.TomlCodec Settings settingsCodec = Settings <$> Toml.text "gh_token" .= ghToken + <*> Toml.string "repository" .= repository + <*> Toml.text "branch" .= branch |