diff options
Diffstat (limited to 'server/HtmlOrphans.hs')
| -rw-r--r-- | server/HtmlOrphans.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/server/HtmlOrphans.hs b/server/HtmlOrphans.hs index b90ea6d..ee30773 100644 --- a/server/HtmlOrphans.hs +++ b/server/HtmlOrphans.hs @@ -75,7 +75,8 @@ instance ToHtml JobStatus where p_ "you should probably ping an admin about this or sth" where autoReloadScript = script_ - "let ws = new WebSocket('ws://localhost:8080' + window.location.pathname + 'realtime');\n\ + "let proto = window.location.protocol === 'https://' ? 'wss' : 'ws://';\ + \let ws = new WebSocket(proto + window.location.host + window.location.pathname + 'realtime');\n\ \ws.onmessage = (event) => {\n\ \ let resp = JSON.parse(event.data);\n\ \ if (resp == 'RelintPending') {\n\ |