aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris2019-10-26 09:55:12 -0700
committerGlenn Morris2019-10-26 09:55:12 -0700
commit8ea63ecdd9b76fbe074bcd6b97ee8400667455a4 (patch)
treeef5e3393f58180d1e61a54ce5cb603459610a510 /lisp
parent045bcdb7c410d4ee7cda1766c76e8bf7df3bf82f (diff)
parent55dcd32ad2209dc34bfb6b713bf73be9bf4c4cb2 (diff)
downloademacs-8ea63ecdd9b76fbe074bcd6b97ee8400667455a4.tar.gz
emacs-8ea63ecdd9b76fbe074bcd6b97ee8400667455a4.zip
Merge from origin/emacs-26
55dcd32 (origin/emacs-26) Fix rcirc not to interpret nil as nickname ...
Diffstat (limited to 'lisp')
-rw-r--r--lisp/net/rcirc.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 4a94afe0917..a373c7c7d3e 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -827,6 +827,7 @@ Function is called with PROCESS, COMMAND, SENDER, ARGS and LINE.")
827 (process-send-string process string))) 827 (process-send-string process string)))
828 828
829(defun rcirc-send-privmsg (process target string) 829(defun rcirc-send-privmsg (process target string)
830 (cl-check-type target string)
830 (rcirc-send-string process (format "PRIVMSG %s :%s" target string))) 831 (rcirc-send-string process (format "PRIVMSG %s :%s" target string)))
831 832
832(defun rcirc-send-ctcp (process target request &optional args) 833(defun rcirc-send-ctcp (process target request &optional args)
@@ -2332,8 +2333,8 @@ With a prefix arg, prompt for new topic."
2332 (let ((timestamp (format-time-string "%s"))) 2333 (let ((timestamp (format-time-string "%s")))
2333 (rcirc-send-ctcp process target "PING" timestamp))) 2334 (rcirc-send-ctcp process target "PING" timestamp)))
2334 2335
2335(defun rcirc-cmd-me (args &optional process target) 2336(defun rcirc-cmd-me (args process target)
2336 (rcirc-send-ctcp process target "ACTION" args)) 2337 (when target (rcirc-send-ctcp process target "ACTION" args)))
2337 2338
2338(defun rcirc-add-or-remove (set &rest elements) 2339(defun rcirc-add-or-remove (set &rest elements)
2339 (dolist (elt elements) 2340 (dolist (elt elements)