mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

add pong

Browse source
This commit is contained in:
David Botton 2024-06-27 18:59:12 -04:00
parent 0cc8aca4da
commit 56507c1300
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
source/clog-connection-websockets.lisp
View file

@ -105,7 +105,8 @@
{if ((c[1] !== null) && (typeof c[1] === 'object') && (c[1].nodeType===1))
{if (c[1].isConnected===false) {$(clog['body']).trigger('gc', c[0])}}})"))
(when *verbose-output*
(format t "Connection ~A Ping~%" connection-id)))
(format t "Connection ~A Ping~%" connection-id)
(execute connection-id "null")))
((equal (first ml) "E")
;; an event
(let* ((em (ppcre:split " " (second ml) :limit 2))