summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorMattias EngdegÄrd <mattiase@acm.org>2023-12-20 14:15:59 +0100
committerMattias EngdegÄrd <mattiase@acm.org>2023-12-21 13:20:27 +0100
commit14ecc377ab43e4c33506c2a8b65bf1e75fb262d3 (patch)
treece31dcb7057b0202f9f02bb94e78ac37d4d4bcb1 /lisp/emacs-lisp
parentff3965795fb80681111708e104f1edd32bdb6199 (diff)
downloademacs-14ecc377ab43e4c33506c2a8b65bf1e75fb262d3.tar.gz
emacs-14ecc377ab43e4c33506c2a8b65bf1e75fb262d3.tar.bz2
emacs-14ecc377ab43e4c33506c2a8b65bf1e75fb262d3.zip
Non-delayed warning for malformed function (bug#67483)
* lisp/emacs-lisp/cconv.el (cconv-convert): Use an immediate warning; a delayed one made little sense as it's a matter of well-formedness.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/cconv.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/cconv.el b/lisp/emacs-lisp/cconv.el
index e65c39e3998..0879c2ee63c 100644
--- a/lisp/emacs-lisp/cconv.el
+++ b/lisp/emacs-lisp/cconv.el
@@ -621,9 +621,8 @@ places where they originally did not directly appear."
`(,func . ,(mapcar (lambda (form)
(cconv-convert form env extend))
forms))
- (macroexp--warn-wrap form (format-message "Malformed function `%S'"
- (car form))
- nil nil)))
+ (byte-compile-warn-x form "Malformed function `%S'" func)
+ nil))
(_ (or (cdr (assq form env)) form))))