(prin1-char): Use characterp.
This commit is contained in:
parent
9dbbce4494
commit
fbd12f5147
1 changed files with 1 additions and 1 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue