From: Dave Love <fx@gnu.org>
Date: Wed, 10 Sep 2003 17:52:58 +0000 (+0000)
Subject: (prin1-char): Use characterp.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1857
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fbd12f5147ba76c538f1f15433ba7088d7411a7d;p=emacs.git

(prin1-char): Use characterp.
---

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index fa9661f54a5..a7dad3428f5 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -447,7 +447,7 @@ alternative printed representations that can be displayed."
   "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))
+       (characterp (event-basic-type char))
        (concat
 	"?"
 	(mapconcat