mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Add TAGMSG handler

Browse source 
* rcirc.el (rcirc-handler-TAGMSG): Add new message handler
This commit is contained in:
Philip Kaludercic 2021-06-09 18:44:55 +02:00
parent 567e288eb9
commit c300326fa0
1 changed files with 8 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/net/rcirc.el
View file

@ -3322,6 +3322,14 @@ is the process object for the current connection."
;; All requested capabilities have been responded to
(rcirc-send-string process "CAP" "END"))))
(defun rcirc-handler-TAGMSG (process sender _args _text)
"Handle a empty tag message from SENDER.
PROCESS is the process object for the current connection."
(dolist (tag rcirc-message-tags)
(when-let ((handler (intern-soft (concat "rcirc-tag-handler-" (car tag))))
((fboundp handler)))
(funcall handler process sender (cdr tag)))))
(defun rcirc-handler-BATCH (process _sender args _text)
"Open or close a batch.
ARGS should have the form (tag type . parameters) when starting a