From 094d3e0e1370f2f8b3619ba6cea8b33ac83dceed Mon Sep 17 00:00:00 2001
From: LLLL Colonq <llll@colonq>
Date: Fri, 12 Jan 2024 14:54:22 -0500
Subject: Update frontend

---
 fig-frontend/src/Fig/Frontend/Utils.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'fig-frontend/src/Fig/Frontend/Utils.hs')

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
-- 
cgit v1.2.3