From: Kenichi Handa Date: Wed, 31 Jan 2001 00:11:38 +0000 (+0000) Subject: (describe-character-set): Pay attention to charsets that don't have X-Git-Tag: emacs-pretest-21.0.98~283 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c7bf5db996bd0ed05eebec8e612eede8a91bccd1;p=emacs.git (describe-character-set): Pay attention to charsets that don't have ISO2022's final char. --- 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 - * 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 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"