summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/bytecomp.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-05-22 20:14:03 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2022-05-22 20:14:03 +0200
commitf14f6180b78656eec2f4dad5b79eb5da20bd0b70 (patch)
treef122ddeb791c76d085bb732a48dde539df4e720b /lisp/emacs-lisp/bytecomp.el
parent3f746d44decf9f991ee2a0a0529a2bba9ad12988 (diff)
downloademacs-f14f6180b78656eec2f4dad5b79eb5da20bd0b70.tar.gz
emacs-f14f6180b78656eec2f4dad5b79eb5da20bd0b70.tar.bz2
emacs-f14f6180b78656eec2f4dad5b79eb5da20bd0b70.zip
Fix previous warning suppression change
* lisp/emacs-lisp/bytecomp.el (byte-compile-emit-callargs-warn) (byte-compile-subr-wrong-args): * lisp/emacs-lisp/byte-run.el (with-suppressed-warnings): * lisp/cedet/semantic/fw.el (semantic-install-function-overrides): The `wrong-args' warning is really called `callargs'.
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-rw-r--r--lisp/emacs-lisp/bytecomp.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 920cdbe5a6f..61382d6989f 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1494,7 +1494,7 @@ when printing the error message."
byte-compile-unresolved-functions)))))
(defun byte-compile-emit-callargs-warn (name actual-args min-args max-args)
- (when (byte-compile-warning-enabled-p 'wrong-args name)
+ (when (byte-compile-warning-enabled-p 'callargs name)
(byte-compile-warn-x
name
"`%s' called with %d argument%s, but %s %s"
@@ -3839,7 +3839,7 @@ If it is nil, then the handler is \"byte-compile-SYMBOL.\""
(defun byte-compile-subr-wrong-args (form n)
- (when (byte-compile-warning-enabled-p 'wrong-args (car form))
+ (when (byte-compile-warning-enabled-p 'callargs (car form))
(byte-compile-warn-x (car form)
"`%s' called with %d arg%s, but requires %s"
(car form) (length (cdr form))