1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-22 07:09:54 +00:00

(unidata-get-name): Handle U+110B.

This commit is contained in:
Kenichi Handa 2005-03-02 11:04:10 +00:00
parent f302f340dc
commit 752fc44b12

View File

@ -701,7 +701,8 @@ Property value is a character."
;; TIndex = SIndex % TCount ;; TIndex = SIndex % TCount
(T (% char 28))) (T (% char 28)))
(format "HANGUL SYLLABLE %s%s%s" (format "HANGUL SYLLABLE %s%s%s"
(aref (aref jamo-name-table 0) L) ;; U+110B is nil in this table.
(or (aref (aref jamo-name-table 0) L) "")
(aref (aref jamo-name-table 1) V) (aref (aref jamo-name-table 1) V)
(if (= T 0) "" (if (= T 0) ""
(aref (aref jamo-name-table 2) (1- T))))))) (aref (aref jamo-name-table 2) (1- T)))))))