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

diff --git a/lisp/emacs-lisp/map-ynp.el b/lisp/emacs-lisp/map-ynp.el
index 93235bd9ece35a08b678a6e217de58b648529303..5b1786af51245041bc8c0baf32fe5befd63d40b1 100644 (file)
--- 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))