From fe903c535211bdbeeb703e06db0da3f7c8c19b4b Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Tue, 16 Sep 2025 01:33:43 -0400 Subject: Update --- src/wasp-chat.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'src/wasp-chat.el') diff --git a/src/wasp-chat.el b/src/wasp-chat.el index 37b0b1e9..badb6856 100644 --- a/src/wasp-chat.el +++ b/src/wasp-chat.el @@ -233,7 +233,8 @@ Optionally, return the buffer NM in chat mode." (defun w/write-chat-event (ev) "Write the string EV to the chat buffer as an event (italicized)." (let ((inhibit-read-only t)) - (with-current-buffer (w/get-chat-event-buffer) + ;; (with-current-buffer (w/get-chat-event-buffer) + (with-current-buffer (w/get-chat-buffer) (goto-char (point-max)) (insert (propertize ev 'face 'italic)) (insert "\n")) @@ -277,7 +278,7 @@ Optionally, return the buffer NM in chat mode." ("*******" . "hunter2"))) (defun w/write-chat-message (msg &optional buf) - "Write MSG to the chat buffer as USER with USERID and COLOR." + "Write MSG to BUF as USER with USERID and COLOR." (w/daily-log (format "%s: %s" (w/. user msg) (w/. text msg))) (let ((inhibit-read-only t)) (with-current-buffer (w/get-chat-buffer buf) @@ -328,7 +329,7 @@ Optionally, return the buffer NM in chat mode." bible-button-text 'face '(:foreground "#bbbbbb"))))) (insert "\n")) - (when-let ((win (get-buffer-window (w/get-chat-buffer)))) + (when-let* ((win (get-buffer-window (w/get-chat-buffer)))) (with-selected-window win (goto-char (point-max)))))) -- cgit v1.2.3