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
 	  "?"