From: Mattias Engdegård <mattiase@acm.org>
Date: Wed, 5 Jun 2024 16:28:59 +0000 (+0200)
Subject: Format string warnings for more functions (bug#71379)
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5b1d78d72a3ee7bfa8f8c6a8078d3666c26f0081;p=emacs.git

Format string warnings for more functions (bug#71379)

* lisp/emacs-lisp/bytecomp.el (byte-compile-format-like):
Add message-box, message-or-box, warn and user-error.

(cherry picked from commit 32bfc825a7e4848f2bf28987ab5259d4031ff6aa)
---

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index fa44b0bc789..94f5264cb6a 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1643,7 +1643,8 @@ extra args."
          nargs (if (= nargs 1) "" "s")
          nfields (if (= nfields 1) "" "s"))))))
 
-(dolist (elt '(format message format-message error user-error))
+(dolist (elt '( format message format-message message-box message-or-box
+                warn error user-error))
   (put elt 'byte-compile-format-like t))
 
 ;; Warn if the function or macro is being redefined with a different