git.fiddlerwoaroof.com
Browse code

bug: actually calculate hostname correctly

Edward authored on 22/03/2021 08:23:15
Showing 1 changed files
raytracing_in_one_weekend/canvas-server.lisp
History View file @ c73cb50
... ... 
@@ -46,7 +46,7 @@
46 46 
                                                (create-image-data 1 1)))
47 47 
                                 (ws (ps:new (-web-socket (+ "ws://"
48 48 
                                                             (ps:@ location host)
49 
-                                                            ":5000/ws")))))
49 
+                                                            "/ws")))))
50 50 
                            (ps:chain ws
51 51 
                                      (add-event-listener
52 52 
                                       "message"