diff options
| author | Glenn Morris <rgm@gnu.org> | 2018-11-27 08:24:33 -0800 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2018-11-27 08:24:33 -0800 |
| commit | 5f3926053eaebc8ebff696abfd5a8d4365d8671d (patch) | |
| tree | d43bdf07056529822373d44bc1b7b7453549175c /lisp/emacs-lisp/map-ynp.el | |
| parent | a291f624289bd2009b7fa230d62b5940e0484c83 (diff) | |
| download | emacs-5f3926053eaebc8ebff696abfd5a8d4365d8671d.tar.gz | |
* lisp/emacs-lisp/map-ynp.el (map-y-or-n-p): Pass format to message.
Diffstat (limited to 'lisp/emacs-lisp/map-ynp.el')
| -rw-r--r-- | lisp/emacs-lisp/map-ynp.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/map-ynp.el b/lisp/emacs-lisp/map-ynp.el index 93235bd9ece..5b1786af512 100644 --- 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)) |