diff options
Diffstat (limited to 'lisp/emacs-lisp/map-ynp.el')
| -rw-r--r-- | lisp/emacs-lisp/map-ynp.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/map-ynp.el b/lisp/emacs-lisp/map-ynp.el index a688330b74a..5c0e28eac9c 100644 --- a/lisp/emacs-lisp/map-ynp.el +++ b/lisp/emacs-lisp/map-ynp.el @@ -341,7 +341,7 @@ When `use-dialog-box' is t, pop up a dialog window to get user input." (delete-minibuffer-contents) (beep) (message message) - (sleep-for 2))) + (sit-for 2))) map) read-answer-map--memoize)))) answer) @@ -361,7 +361,7 @@ When `use-dialog-box' is t, pop up a dialog window to get user input." (short (read-from-minibuffer prompt nil short-answer-map nil - 'yes-or-no-p-history)) + 'read-char-history)) (t (read-from-minibuffer prompt nil nil nil @@ -381,7 +381,7 @@ When `use-dialog-box' is t, pop up a dialog window to get user input." ".\n"))) (beep) (message message) - (sleep-for 2))) + (sit-for 2))) answer)) ;;; map-ynp.el ends here |