From acc81368d1094c022ca7b09fe44cfd4f6e57b2ec Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Wed, 16 Dec 1998 20:51:34 +0000 Subject: [PATCH] (read-passwd): Ignore input methods. --- lisp/subr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/subr.el b/lisp/subr.el index 46939a0b4ad..1f042f24cd3 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -803,7 +803,7 @@ Optional DEFAULT is a default password to use instead of empty input." (while (progn (message "%s%s" prompt (make-string (length pass) ?.)) - (setq c (read-char)) + (setq c (read-char nil t)) (and (/= c ?\r) (/= c ?\n) (/= c ?\e))) (if (= c ?\C-u) (setq pass "") -- 2.39.2