summaryrefslogtreecommitdiff
path: root/lisp/erc/erc-backend.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-05-24 19:02:06 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2022-05-24 19:02:06 +0200
commit5f6e64a316adc6cd6ea140453718160643c6cd93 (patch)
tree5165c70ff53fb7e2bf5b617ca6250fbd721b81f7 /lisp/erc/erc-backend.el
parent5b767273d6069f8dcd2af1dfadaf9a147847d504 (diff)
downloademacs-5f6e64a316adc6cd6ea140453718160643c6cd93.tar.gz
Don't use `format-message' to make doc strings in erc-backend
* lisp/erc/erc-backend.el (define-erc-response-handler): Use `format' here instead of `format-message' since Emacs will expand the doc string later when the user asks for help about the symbols defined.
Diffstat (limited to 'lisp/erc/erc-backend.el')
-rw-r--r--lisp/erc/erc-backend.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/erc/erc-backend.el b/lisp/erc/erc-backend.el
index 4b21711da42..4c13f4c419a 100644
--- a/lisp/erc/erc-backend.el
+++ b/lisp/erc/erc-backend.el
@@ -1192,7 +1192,7 @@ Would expand to:
aliases))
(let* ((hook-name (intern (format "erc-server-%s-functions" name)))
(fn-name (intern (format "erc-server-%s" name)))
- (hook-doc (format-message "\
+ (hook-doc (format "\
%sHook called upon receiving a %%s server response.
Each function is called with two arguments, the process associated
with the response and the parsed response. If the function returns
@@ -1203,7 +1203,7 @@ See also `%s'."
(concat extra-var-doc "\n\n")
"")
fn-name))
- (fn-doc (format-message "\
+ (fn-doc (format "\
%sHandler for a %s server response.
PROC is the server process which returned the response.
PARSED is the actual response as an `erc-response' struct.