From b5af25ff7851498af855fe7f252117b3a0bee070 Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Sun, 21 Feb 2021 18:01:30 +0100
Subject: websocket-send: Add debug output for WebSocket message send

Realised I'm only printing the received messages. It would help to see
what messages we send and when too. Still having the inconsistent tab
reload problem, so it looks like my
16c8122254725805be666cf065c590d54d66dfad change didn't fix it.
---
 l/src/main.lisp | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'l/src/main.lisp')

diff --git a/l/src/main.lisp b/l/src/main.lisp
index 8df0172..bf16ef4 100644
--- a/l/src/main.lisp
+++ b/l/src/main.lisp
@@ -139,5 +139,7 @@
     (filter #'extensionp targets)))
 
 (defun websocket-send (client data)
+  (format t "Sending: ~a~%" data)
+
   (wsd:send client data)
   (wait-group:add *wg*))
-- 
cgit v1.2.3