From 14ecc377ab43e4c33506c2a8b65bf1e75fb262d3 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Wed, 20 Dec 2023 14:15:59 +0100 Subject: [PATCH] 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. --- lisp/emacs-lisp/cconv.el | 5 ++--- 1 file 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)))) -- 2.39.2