(standard-display-default): Make the test of `l'
useful.
This commit is contained in:
parent
f6499c03d8
commit
1c2c3f160b
2 changed files with 5 additions and 3 deletions
|
@ -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.
|
||||
|
||||
|
|
|
@ -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.
|
||||
|
|
Loading…
Add table
Reference in a new issue