diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/international/mule-diag.el | 2 |
2 files changed, 5 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 33352694085..512e8c05a1a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,7 +1,9 @@ 2001-01-31 Kenichi Handa <handa@etl.go.jp> - * international/mule-diag.el (describe-character-set): Pay - attention to charsets that don't have ISO2022's final char. + * international/mule.el (charset-info): Fix docstring. + + * international/mule-diag.el (describe-character-set): Check final + char valid before printing it. 2001-01-30 Gerd Moellmann <gerd@gnu.org> diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el index 43e12708560..bbc818591a2 100644 --- a/lisp/international/mule-diag.el +++ b/lisp/international/mule-diag.el @@ -492,7 +492,7 @@ detailed meanings of these arguments." (format "%d\n" (aref info 3)) (format "%dx%d\n" (aref info 3) (aref info 3)))) (insert "the final char of ISO2022's designation sequence: ") - (if (aref info 8) + (if (>= (aref info 8) 0) (insert (format "`%c'\n" (aref info 8))) (insert "not assigned\n")) (insert (format "width (how many columns on screen): %d\n" |