* net/rcirc.el (rcirc-send-ctcp): Remove spurious arg to `format'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index be1cc0b6a523fe4345fadb698e42140204d679ec..392510c63d03f474aa81ed70297d0628d11d735e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-02-11  Juanma Barranquero  <lekktu@gmail.com>
+
+       * net/rcirc.el (rcirc-send-ctcp): Remove spurious arg to `format'.
+
 2011-02-10  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * server.el (server-process-filter): Use pcase.

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 8e4ded624ded02bb94d790e623d5c507fa193083..c3e4f3d61699a8f8a72a1b386abf4c858111f2d3 100644 (file)
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -720,7 +720,7 @@ Function is called with PROCESS, COMMAND, SENDER, ARGS and LINE.")
 (defun rcirc-send-ctcp (process target request &optional args)
   (let ((args (if args (concat " " args) "")))
     (rcirc-send-privmsg process target
-                        (format "\C-a%s%s\C-a" request args ""))))
+                        (format "\C-a%s%s\C-a" request args))))
 
 (defun rcirc-buffer-process (&optional buffer)
   "Return the process associated with channel BUFFER.