diff options
| author | Glenn Morris | 2008-02-02 04:19:16 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-02-02 04:19:16 +0000 |
| commit | 9e11995de38f963ad26bffe78138e7d6d9ce6038 (patch) | |
| tree | 081dbf0e4e5ad1346f084f51ddf9631c47925ce8 | |
| parent | e0576f07f3cc1596f9aee709cd772f46a8c3ad27 (diff) | |
| download | emacs-9e11995de38f963ad26bffe78138e7d6d9ce6038.tar.gz emacs-9e11995de38f963ad26bffe78138e7d6d9ce6038.zip | |
(latin1-display): Use characterp rather than char-valid-p.
| -rw-r--r-- | lisp/international/latin1-disp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/international/latin1-disp.el b/lisp/international/latin1-disp.el index a4d4ff0c9d0..4263ab6a04f 100644 --- a/lisp/international/latin1-disp.el +++ b/lisp/international/latin1-disp.el | |||
| @@ -112,8 +112,8 @@ a Unicode font with which to display them." | |||
| 112 | ;; It doesn't look as though we have a Unicode font. | 112 | ;; It doesn't look as though we have a Unicode font. |
| 113 | (map-char-table | 113 | (map-char-table |
| 114 | (lambda (c uc) | 114 | (lambda (c uc) |
| 115 | (when (and (char-valid-p c) | 115 | (when (and (characterp c) |
| 116 | (char-valid-p uc) | 116 | (characterp uc) |
| 117 | (not (aref standard-display-table uc))) | 117 | (not (aref standard-display-table uc))) |
| 118 | (aset standard-display-table uc | 118 | (aset standard-display-table uc |
| 119 | (or (aref standard-display-table c) | 119 | (or (aref standard-display-table c) |