1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-25 07:40:40 -07:00

(rcirc-cmd-join): Improve argument/docstring consistency.

This commit is contained in:
Juanma Barranquero 2006-02-02 16:49:58 +00:00
parent ece9f5cc23
commit f161b0795c
2 changed files with 5 additions and 4 deletions

View file

@ -52,6 +52,7 @@
(rcirc-cmd-ignore, rcirc-browse-url, rcirc-url-regexp):
Fix typos in docstrings.
(rcirc-print): "?\ " -> "?\s".
(rcirc-cmd-join): Improve argument/docstring consistency.
2006-02-01 Mark A. Hershberger <mah@everybody.org>

View file

@ -1375,14 +1375,14 @@ Also, clear the overlay arrow if the current buffer is now hidden."
(when (not existing-buffer)
(rcirc-cmd-whois nick))))
(defun-rcirc-command join (args)
(defun-rcirc-command join (channel)
"Join CHANNEL."
(interactive "sJoin channel: ")
(let* ((channel (car (split-string args)))
(buffer (rcirc-get-buffer-create process channel)))
(let ((buffer (rcirc-get-buffer-create process
(car (split-string channel)))))
(when (not (eq (selected-window) (minibuffer-window)))
(funcall rcirc-switch-to-buffer-function buffer))
(rcirc-send-string process (concat "JOIN " args))))
(rcirc-send-string process (concat "JOIN " channel))))
(defun-rcirc-command part (channel)
"Part CHANNEL."