Mercurial > emacs
diff lisp/emacs-lisp/lisp-mode.el @ 55521:ea0f46cadeb2
(prin1-char): Use eventp.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Tue, 11 May 2004 03:17:59 +0000 |
parents | 96f7b2598aa3 |
children | 6010b740e1d0 |
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 "?"