diff options
| -rw-r--r-- | lisp/disp-table.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/disp-table.el b/lisp/disp-table.el index 174b5d27211..106ccd028e2 100644 --- a/lisp/disp-table.el +++ b/lisp/disp-table.el | |||
| @@ -123,7 +123,7 @@ Valid symbols are `truncation', `wrap', `escape', `control', | |||
| 123 | (defun standard-display-default (l h) | 123 | (defun standard-display-default (l h) |
| 124 | "Display characters in the range L to H using the default notation." | 124 | "Display characters in the range L to H using the default notation." |
| 125 | (while (<= l h) | 125 | (while (<= l h) |
| 126 | (if (and (>= l ?\ ) (char-valid-p l)) | 126 | (if (and (>= l ?\ ) (characterp l)) |
| 127 | (aset standard-display-table l nil)) | 127 | (aset standard-display-table l nil)) |
| 128 | (setq l (1+ l)))) | 128 | (setq l (1+ l)))) |
| 129 | 129 | ||