r8754: update

diff --git a/logger.lisp b/logger.lisp
index 3bb165f1560f7145d07c48cada914db38b582331..feb6dd5732dbff1e5674e80dec179224aa13eef3 100644 (file)
--- a/logger.lisp
+++ b/logger.lisp
@@ -407,6 +407,7 @@
     (output-event msg :kick channel who-kicked)
     (when (string-equal (nickname logger) who-kicked)
       (add-private-log-entry
+       logger
        "Logging daemon ~A has been kicked from ~A (~A)"
        (nickname logger) channel (trailing-argument msg))
       (daemon-sleep 1)
@@ -534,6 +535,7 @@
       (t
        (add-log-entry
        (get-unknown-log-stream (find-logger-with-connection (connection msg)))
+       "~A"
        (raw-message-string msg))))
     result))