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
This commit is contained in:
Amin Bandali 2020-12-28 16:44:58 -05:00
parent c156723769
commit c6d5555646
No known key found for this signature in database
GPG key ID: 8B44A0CDC7B956F2

View file

@ -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)