diff options
Diffstat (limited to 'fig-frontend/src/Fig/Frontend/Utils.hs')
| -rw-r--r-- | fig-frontend/src/Fig/Frontend/Utils.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/fig-frontend/src/Fig/Frontend/Utils.hs b/fig-frontend/src/Fig/Frontend/Utils.hs index 1ba1d5f..20234e7 100644 --- a/fig-frontend/src/Fig/Frontend/Utils.hs +++ b/fig-frontend/src/Fig/Frontend/Utils.hs @@ -22,6 +22,7 @@ data Config = Config { port :: Int , assetPath :: FilePath , clientId :: Text + , authToken :: Text } deriving (Show, Eq, Ord) configCodec :: Toml.TomlCodec Config @@ -29,6 +30,7 @@ configCodec = do port <- Toml.int "port" Toml..= (\a -> a.port) assetPath <- Toml.string "asset_path" Toml..= (\a -> a.assetPath) clientId <- Toml.text "client_id" Toml..= (\a -> a.clientId) + authToken <- Toml.text "auth_token" Toml..= (\a -> a.authToken) pure $ Config{..} loadConfig :: FilePath -> IO Config |