From cb85036ca25cd9e13e4e959e105b88bb73dbf9e5 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Sat, 7 Mar 2026 23:41:50 -0500 Subject: Refactor, use app tokens --- fig-web/src/Fig/Web/Public.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'fig-web/src/Fig/Web/Public.hs') diff --git a/fig-web/src/Fig/Web/Public.hs b/fig-web/src/Fig/Web/Public.hs index 69678bb..816f724 100644 --- a/fig-web/src/Fig/Web/Public.hs +++ b/fig-web/src/Fig/Web/Public.hs @@ -10,10 +10,10 @@ import qualified Network.Wai.Handler.Warp as Warp import qualified Web.Scotty as Sc +import qualified Fig.Utils.DB as DB import Fig.Bus.Binary.Client import Fig.Web.Types import Fig.Web.Utils -import qualified Fig.Web.DB as DB import qualified Fig.Web.Module.Misc as Misc import qualified Fig.Web.Module.TwitchAuth as TwitchAuth import qualified Fig.Web.Module.Exchange as Exchange @@ -39,7 +39,7 @@ server :: PublicOptions -> Config -> (Text, Text) -> IO () server options cfg busAddr = do log $ "Web server running on port " <> tshow cfg.port log "Connecting to database..." - db <- DB.connect cfg + db <- DB.connect cfg.dbHost channels <- newChannels globals <- newGlobals busClient busAddr -- cgit v1.2.3