diff --git a/README.md b/README.md index e046141..c9c040d 100644 --- a/README.md +++ b/README.md @@ -34,4 +34,5 @@ this depends on your local cabal cache. - Add the nix modules to the flake - Better Error handling - Find out which exceptions the SMTP module throws - +- Split config into secrets and non secret config + - make the pad url configurable diff --git a/app/Config.hs b/app/Config.hs index 6033e46..604d5cb 100644 --- a/app/Config.hs +++ b/app/Config.hs @@ -16,7 +16,7 @@ data Config = Config { } deriving Show configCodec :: TomlCodec Config -configCodec = table "mail" $ Config +configCodec = flip Toml.table "mail" $ Config <$> Toml.string "domain" .= mailDomain <*> Toml.string "user" .= mailUsername <*> Toml.string "password" .= mailPassword