Mercurial > emacs
changeset 55521:ea0f46cadeb2
(prin1-char): Use eventp.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 11 May 2004 03:17:59 +0000 |
| parents | 30d4272bcc4b |
| children | e340e08a42b9 |
| files | lisp/emacs-lisp/lisp-mode.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp-mode.el Tue May 11 03:17:45 2004 +0000 +++ b/lisp/emacs-lisp/lisp-mode.el Tue May 11 03:17:59 2004 +0000 @@ -448,7 +448,7 @@ "Return a string representing CHAR as a character rather than as an integer. If CHAR is not a character, return nil." (and (integerp char) - (char-valid-p (event-basic-type char)) + (eventp char) (let ((c (event-basic-type char))) (concat "?"