(standard-display-default): Make the test of `l'

useful.
This commit is contained in:
Dave Love 2000-08-24 16:16:21 +00:00
parent f6499c03d8
commit 1c2c3f160b
2 changed files with 5 additions and 3 deletions

View file

@ -1,5 +1,8 @@
2000-08-24 Dave Love <fx@gnu.org>
* disp-table.el (standard-display-default): Make the test of `l'
useful.
* language/european.el ("Latin-8", "Latin-9"): Add input methods,
mod sample text.

View file

@ -121,9 +121,8 @@ 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 ?\ ) (< l 127))
(aset standard-display-table l nil)
(aset standard-display-table l nil))
(if (and (>= l ?\ ) (char-valid-p l))
(aset standard-display-table l nil))
(setq l (1+ l))))
;; This function does NOT take terminal-dependent escape sequences.