summaryrefslogtreecommitdiff
path: root/fig-web/src/Fig/Web/Secure.hs
diff options
context:
space:
mode:
Diffstat (limited to 'fig-web/src/Fig/Web/Secure.hs')
-rw-r--r--fig-web/src/Fig/Web/Secure.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/fig-web/src/Fig/Web/Secure.hs b/fig-web/src/Fig/Web/Secure.hs
index 5aebff8..b1f04f5 100644
--- a/fig-web/src/Fig/Web/Secure.hs
+++ b/fig-web/src/Fig/Web/Secure.hs
@@ -10,11 +10,11 @@ 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 Fig.Web.Auth
-import qualified Fig.Web.DB as DB
import qualified Fig.Web.Module.Exchange as Exchange
import qualified Fig.Web.Module.Redeem as Redeem
import qualified Fig.Web.Module.Advent as Advent
@@ -29,7 +29,7 @@ server :: SecureOptions -> 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