mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 11:00:45 -08:00
Code Issues Projects Releases Wiki Activity

Retain message logging in map-y-or-n-p

Browse source 
* lisp/emacs-lisp/map-ynp.el (map-y-or-n-p):
Stop disabling logging to Messages buffer.  (Bug#13326)
This commit is contained in:
Glenn Morris 2016-12-07 20:25:36 -05:00
parent 5415c8be60
commit a6776f0823
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/map-ynp.el
View file

@ -144,8 +144,7 @@ Returns the number of actions taken."
(cons prompt map)) (cons prompt map))
'quit)) 'quit))
;; Prompt in the echo area. ;; Prompt in the echo area.
(let ((cursor-in-echo-area (not no-cursor-in-echo-area)) (let ((cursor-in-echo-area (not no-cursor-in-echo-area)))
(message-log-max nil))
(message (apply 'propertize "%s(y, n, !, ., q, %sor %s) " (message (apply 'propertize "%s(y, n, !, ., q, %sor %s) "
minibuffer-prompt-properties) minibuffer-prompt-properties)
prompt user-keys prompt user-keys