diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/net/rcirc.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index be1cc0b6a52..392510c63d0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-02-11 Juanma Barranquero <lekktu@gmail.com> | ||
| 2 | |||
| 3 | * net/rcirc.el (rcirc-send-ctcp): Remove spurious arg to `format'. | ||
| 4 | |||
| 1 | 2011-02-10 Stefan Monnier <monnier@iro.umontreal.ca> | 5 | 2011-02-10 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 6 | ||
| 3 | * server.el (server-process-filter): Use pcase. | 7 | * server.el (server-process-filter): Use pcase. |
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el index 8e4ded624de..c3e4f3d6169 100644 --- a/lisp/net/rcirc.el +++ b/lisp/net/rcirc.el | |||
| @@ -720,7 +720,7 @@ Function is called with PROCESS, COMMAND, SENDER, ARGS and LINE.") | |||
| 720 | (defun rcirc-send-ctcp (process target request &optional args) | 720 | (defun rcirc-send-ctcp (process target request &optional args) |
| 721 | (let ((args (if args (concat " " args) ""))) | 721 | (let ((args (if args (concat " " args) ""))) |
| 722 | (rcirc-send-privmsg process target | 722 | (rcirc-send-privmsg process target |
| 723 | (format "\C-a%s%s\C-a" request args "")))) | 723 | (format "\C-a%s%s\C-a" request args)))) |
| 724 | 724 | ||
| 725 | (defun rcirc-buffer-process (&optional buffer) | 725 | (defun rcirc-buffer-process (&optional buffer) |
| 726 | "Return the process associated with channel BUFFER. | 726 | "Return the process associated with channel BUFFER. |