diff options
| -rw-r--r-- | lisp/emacs-lisp/map-ynp.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/map-ynp.el b/lisp/emacs-lisp/map-ynp.el index 86057706ffc..02770d59e2b 100644 --- a/lisp/emacs-lisp/map-ynp.el +++ b/lisp/emacs-lisp/map-ynp.el | |||
| @@ -144,8 +144,7 @@ Returns the number of actions taken." | |||
| 144 | (cons prompt map)) | 144 | (cons prompt map)) |
| 145 | 'quit)) | 145 | 'quit)) |
| 146 | ;; Prompt in the echo area. | 146 | ;; Prompt in the echo area. |
| 147 | (let ((cursor-in-echo-area (not no-cursor-in-echo-area)) | 147 | (let ((cursor-in-echo-area (not no-cursor-in-echo-area))) |
| 148 | (message-log-max nil)) | ||
| 149 | (message (apply 'propertize "%s(y, n, !, ., q, %sor %s) " | 148 | (message (apply 'propertize "%s(y, n, !, ., q, %sor %s) " |
| 150 | minibuffer-prompt-properties) | 149 | minibuffer-prompt-properties) |
| 151 | prompt user-keys | 150 | prompt user-keys |