diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-05-11 03:17:59 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-05-11 03:17:59 +0000 |
| commit | 7a439904ec5545434105348abfb1fc686c34c691 (patch) | |
| tree | de7b57714b385894a5f0688ebc7e8d53f3e20960 /lisp/emacs-lisp/lisp-mode.el | |
| parent | 7a2937ce8a29cc4ad7cad8ca56a617c764b068bc (diff) | |
| download | emacs-7a439904ec5545434105348abfb1fc686c34c691.tar.gz | |
(prin1-char): Use eventp.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mode.el')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 853498b0c8c..4057fe2968e 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -448,7 +448,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)) + (eventp char) (let ((c (event-basic-type char))) (concat "?" |