kmx.io/cl-thot

diff --git a/thot.lisp b/thot.lisp
index 1b17cbb..227984d 100644
--- a/thot.lisp
+++ b/thot.lisp
@@ -585,8 +585,7 @@ The requested url "
       (socket:bind-inet fd host port)
       (socket:listen fd 128)
       (when (debug-p :thot)
-        (format t "~A~%" *acceptor-loop*)
-        (force-output))
+        (msg debug *acceptor-loop*))
       (funcall (funcall *acceptor-loop* fd)))))
 
 (defun set-nonblocking (fd)