* lisp/emacs-lisp/map-ynp.el (map-y-or-n-p): Pass format to message.

2018-11-27 08:24:33 -08:00
parent a291f62428
commit 5f3926053e
1 changed files with 3 additions and 1 deletions
--- a/lisp/emacs-lisp/map-ynp.el
+++ b/lisp/emacs-lisp/map-ynp.el
@@ -254,7 +254,9 @@ the current %s and exit."
    ;; Clear the last prompt from the minibuffer, and restore the
    ;; previous echo-area message, if any.
    (let ((message-log-max nil))
-      (message (or msg "")))
+      (if msg
+          (message "%s" msg)
+        (message "")))
    ;; Return the number of actions that were taken.
    actions))