具有Snap的Websockets不会在生产中绑定

Question

请帮助我： 我想在生产中实现websockets-snap，但它们似乎不会占用地址。我有以下代码：

function createChatSocket() { if(window.location.host == '') { /* Running on localhost */ return new WebSocket('ws://35.197.208.147/ws/console/'); } else { /* Running in "production" */ return new WebSocket('wss://jaspervdj.be/websockets/example/chat/'); } }

the server.hs file

window.location.host不为空，它是ip

app :: Snap () app = Snap.route [ ("", Snap.ifTop $ Snap.serveFile "./shorts/index.html") , ("console", console) ] .... .... .... -------------------------------------------------------------------------------- console :: Snap () console = do state <- liftIO $ newMVar newServerState WS.runWebSocketsSnap $ application state

wss://jaspervdj.be/websockets/example/chat/

无论我做什么，它总会返回https://github.com/srianant/computer_vision 上找到的websockets，而不是我的服务器。我该怎么办？

由于

Answer 1

这是一个JavaScript问题，而不是Haskell问题。 window.location.host 永远不会为空。因此，您总是最终使用websocket到jaspervdj.be。