From 14fea8b132860f48a3de17c5afb28a6aa46aa490 Mon Sep 17 00:00:00 2001 From: "Basil L. Contovounesios" Date: Fri, 7 Jun 2024 10:47:14 +0200 Subject: [PATCH] Fix user-error usage in sgml-mode.el * lisp/textmodes/sgml-mode.el (html-mode--image-yank-handler): Address recent byte-compiler format string warnings (bug#71379). (cherry picked from commit 025c3eaf9cc9956ff5a10a7bf09a26f176919a28) --- lisp/textmodes/sgml-mode.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el index 1f440ebf7d0..5c744374128 100644 --- a/lisp/textmodes/sgml-mode.el +++ b/lisp/textmodes/sgml-mode.el @@ -2470,10 +2470,10 @@ To work around that, do: (defun html-mode--image-yank-handler (type image) (let ((file (read-file-name (format "Save %s image to: " type)))) (when (file-directory-p file) - (user-error "%s is a directory")) + (user-error "%s is a directory" file)) (when (and (file-exists-p file) (not (yes-or-no-p (format "%s exists; overwrite?" file)))) - (user-error "%s exists")) + (user-error "%s exists" file)) (with-temp-buffer (set-buffer-multibyte nil) (insert image) -- 2.39.5