diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2006-02-02 16:49:58 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2006-02-02 16:49:58 +0000 |
| commit | f161b0795cbc9c189046326f80d45ea0df94e5a8 (patch) | |
| tree | 7b7d109869fb628a4a145ca577b792db10bf1c6f | |
| parent | ece9f5cc239e513a2e23ad453cd780eb36833780 (diff) | |
| download | emacs-f161b0795cbc9c189046326f80d45ea0df94e5a8.tar.gz emacs-f161b0795cbc9c189046326f80d45ea0df94e5a8.tar.bz2 emacs-f161b0795cbc9c189046326f80d45ea0df94e5a8.zip | |
(rcirc-cmd-join): Improve argument/docstring consistency.
| -rw-r--r-- | lisp/ChangeLog | 1 | ||||
| -rw-r--r-- | lisp/net/rcirc.el | 8 |
2 files changed, 5 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d9feee95b4e..fb8f7713fe1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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> diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el index 44e3fa8c6ec..2e512ae4e19 100644 --- a/lisp/net/rcirc.el +++ b/lisp/net/rcirc.el @@ -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." |