Commit 26979628 authored by Paul Eggert's avatar Paul Eggert

Fix quoting glitch in formatting Gnus messages

* lisp/gnus/gnus-util.el (defmacro, gnus-message): Use
‘format-message’, not ‘format’, to be compatible with ‘message’.
parent 72729014
......@@ -468,7 +468,8 @@ displayed in the echo area."
(gnus-add-timestamp-to-message
(if (or (and (null ,format-string) (null ,args))
(progn
(setq str (apply 'format ,format-string ,args))
(setq str (apply #'format-message ,format-string
,args))
(zerop (length str))))
(prog1
(and ,format-string str)
......@@ -506,7 +507,7 @@ inside loops."
;; We have to do this format thingy here even if the result isn't
;; shown - the return value has to be the same as the return value
;; from `message'.
(apply 'format args)))
(apply #'format-message args)))
(defun gnus-final-warning ()
(when (and (consp gnus-action-message-log)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment