mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-26 19:18:50 +00:00
Code Issues Releases Activity

(map-y-or-n-p): Ignore input methods.

Browse Source
This commit is contained in:
Karl Heuer 1998-12-16 20:45:29 +00:00
parent 8303c3d21d
commit 037eed4e59
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/map-ynp.el
View File

@ -149,7 +149,7 @@ Returns the number of actions taken."
(key-description (vector help-char)))
(if minibuffer-auto-raise
(raise-frame (window-frame (minibuffer-window))))
(setq char (read-event))
(setq char (read-event nil t))
;; Show the answer to the question.
(message "%s(y, n, !, ., q, %sor %s) %s"
prompt user-keys