(standard-display-default): Use characterp.

This commit is contained in:
Dave Love
2003-09-10 17:54:12 +00:00
parent 97443772e0
commit 96a61661d0

View File

@@ -123,7 +123,7 @@ Valid symbols are `truncation', `wrap', `escape', `control',
(defun standard-display-default (l h)
"Display characters in the range L to H using the default notation."
(while (<= l h)
(if (and (>= l ?\ ) (char-valid-p l))
(if (and (>= l ?\ ) (characterp l))
(aset standard-display-table l nil))
(setq l (1+ l))))