diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2022-12-29 17:00:01 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2022-12-29 17:00:01 +0100 |
| commit | 29d23b7fa00ed8263baa060d487b526d51fa6986 (patch) | |
| tree | 193efedacba016a6e88a4e23b22121e37f284744 /lisp/emacs-lisp/macroexp.el | |
| parent | 314cbef84944145e2160736ce32812403ed99cd9 (diff) | |
| download | emacs-29d23b7fa00ed8263baa060d487b526d51fa6986.tar.gz | |
Consistent empty-body warning messages for let and let*
* lisp/emacs-lisp/macroexp.el (macroexp--expand-all):
* test/lisp/emacs-lisp/bytecomp-tests.el
(bytecomp-test--with-suppressed-warnings):
Make warning messages for let and let* consistent with other
empty-body warnings.
Diffstat (limited to 'lisp/emacs-lisp/macroexp.el')
| -rw-r--r-- | lisp/emacs-lisp/macroexp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el index 8aa9cb860c4..d8c0cd5c7bd 100644 --- a/lisp/emacs-lisp/macroexp.el +++ b/lisp/emacs-lisp/macroexp.el @@ -367,7 +367,7 @@ Assumes the caller has bound `macroexpand-all-environment'." (if (null body) (macroexp-unprogn (macroexp-warn-and-return - (format "Empty %s body" fun) + (format "`%s' with empty body" fun) nil (list 'empty-body fun) 'compile-only fun)) (macroexp--all-forms body)) (cdr form)) |