From 5c288909b96452ed5d01befc8b624e94511620ed Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 8 Apr 2016 14:02:24 -0400 Subject: [PATCH 1/1] * lisp/subr.el (read-key): Don't let the prompt linger (bug#22714) --- lisp/subr.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/subr.el b/lisp/subr.el index dde7691623..cbcc27baad 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -2086,6 +2086,10 @@ some sort of escape sequence, the ambiguity is resolved via `read-key-delay'." (aref keys 1) key))) (cancel-timer timer) + ;; For some reason, `read-key(-sequence)' leaves the prompt in the echo + ;; area, whereas `read-event' seems to empty it just before returning + ;; (bug#22714). So, let's mimick the behavior of `read-event'. + (message nil) (use-global-map old-global-map)))) (defvar read-passwd-map -- 2.39.2