summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorMattias EngdegÄrd <mattiase@acm.org>2023-01-12 15:38:15 +0100
committerMattias EngdegÄrd <mattiase@acm.org>2023-01-16 19:42:31 +0100
commitbcaa63ac506dc070b29db13326801ff978e8b00d (patch)
tree1ecf3371a5450149b9c9de4dcdd9c210cfa4e685 /lisp/emacs-lisp
parent2a85d7a07c16dd854490b5eff72930d4a80b1415 (diff)
downloademacs-bcaa63ac506dc070b29db13326801ff978e8b00d.tar.gz
emacs-bcaa63ac506dc070b29db13326801ff978e8b00d.tar.bz2
emacs-bcaa63ac506dc070b29db13326801ff978e8b00d.zip
* lisp/emacs-lisp/bytecomp.el (format-message): Warn on bad arity.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/bytecomp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 23d02ba92cf..fb4b73b1c14 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1575,7 +1575,7 @@ extra args."
"`%s' called with %d args to fill %d format field(s)" (car form)
nargs nfields)))))
-(dolist (elt '(format message error))
+(dolist (elt '(format message format-message error))
(put elt 'byte-compile-format-like t))
(defun byte-compile--suspicious-defcustom-choice (type)