From af40134c53de8a52f238bb801aac591ac955a303 Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Thu, 16 May 2019 12:37:39 +0100 Subject: [PATCH] Correct server websocket http-request pattern --- syndicate/distributed/server/websocket.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/syndicate/distributed/server/websocket.rkt b/syndicate/distributed/server/websocket.rkt index 812cf86..be2a5da 100644 --- a/syndicate/distributed/server/websocket.rkt +++ b/syndicate/distributed/server/websocket.rkt @@ -36,6 +36,6 @@ (define (spawn-websocket-server! [port default-http-server-port]) (spawn #:name 'websocket-server-listener - (during/spawn (http-request $id 'get (http-resource (http-server _ port #f) `()) _ _ _) + (during/spawn (http-request $id 'get (http-resource (http-server _ port #f) `("" ())) _ _ _) #:name `(server-poa ,id) (server-facet/websocket id))))