Mercurial > emacs
changeset 11758:eb208ec6d216
(Helper-help): Use read-key-sequence.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 08 May 1995 21:09:17 +0000 |
| parents | 108646bbd84f |
| children | 51816af03215 |
| files | lisp/emacs-lisp/helper.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/helper.el Mon May 08 19:50:10 1995 +0000 +++ b/lisp/emacs-lisp/helper.el Mon May 08 21:09:17 1995 +0000 @@ -140,7 +140,7 @@ (let ((continue t) c) (while continue (message "Help (Type ? for further options)") - (setq c (char-to-string (downcase (read-char)))) + (setq c (read-key-sequence nil)) (setq c (lookup-key Helper-help-map c)) (cond ((eq c 'Helper-help-options) (Helper-help-options))