fix build error on windows

This commit is contained in:
Wolfgang Walther
2020-10-14 09:26:35 -05:00
committed by Steve Chavez
parent 5bb670b736
commit f5331d1a77
+2
View File
@@ -67,7 +67,9 @@ main = do
host = configHost conf
port = configPort conf
maybeSocketAddr = configSocket conf
#ifndef mingw32_HOST_OS
socketFileMode = configSocketMode conf
#endif
dbUri = toS (configDbUri conf)
(dbChannelEnabled, dbChannel) = (configDbChannelEnabled conf, toS $ configDbChannel conf)
serverSettings =