Mercurial > emacs
changeset 28628:60285ddb5d02
(read-passwd): Use read-char-exclusive.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 17 Apr 2000 16:08:26 +0000 |
| parents | 1f6ba3e73fe9 |
| children | 437e522505fb |
| files | lisp/subr.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Mon Apr 17 16:08:07 2000 +0000 +++ b/lisp/subr.el Mon Apr 17 16:08:26 2000 +0000 @@ -884,7 +884,7 @@ (while (progn (message "%s%s" prompt (make-string (length pass) ?.)) - (setq c (read-char nil t)) + (setq c (read-char-exclusive nil t)) (and (/= c ?\r) (/= c ?\n) (/= c ?\e))) (if (= c ?\C-u) (setq pass "")