From: Amin Bandali <bandali@gnu.org>
Date: Mon, 28 Dec 2020 21:44:58 +0000 (-0500)
Subject: Display messages sent using ERC's /say
X-Git-Tag: emacs-27.1.91~36
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c6d555564617d187d9e1aacd12da6ace56718f81;p=emacs.git

Display messages sent using ERC's /say

* lisp/erc/erc.el (erc-cmd-SAY): Call `erc-display-msg' to display the
user's message in the buffer, just like other [non-command] messages.

https://lists.gnu.org/r/help-gnu-emacs/2020-12/msg00066.html
---

diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index 3033122437a..c32a1d97166 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -2847,7 +2847,9 @@ need this when pasting multiple lines of text."
   (if (string-match "^\\s-*$" line)
       nil
     (string-match "^ ?\\(.*\\)" line)
-    (erc-process-input-line (match-string 1 line) nil t)))
+    (let ((msg (match-string 1 line)))
+      (erc-display-msg msg)
+      (erc-process-input-line msg nil t))))
 (put 'erc-cmd-SAY 'do-not-parse-args t)
 
 (defun erc-cmd-SET (line)