mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
Support character composition for Hangul jamo
* lisp/language/korean.el: Add composition rules for conjoining Hangul jamo. (Bug#40502)
This commit is contained in:
parent
c36792bd79
commit
4e109d1529
1 changed files with 12 additions and 0 deletions
|
|
@ -84,6 +84,18 @@ and the following key bindings are available within Korean input methods:
|
|||
F9, Hangul_Hanja: hangul-to-hanja-conversion")
|
||||
))
|
||||
|
||||
;; For auto-composing conjoining jamo.
|
||||
(let* ((choseong "[\u1100-\u115F\uA960-\uA97C]")
|
||||
(jungseong "[\u1160-\u11A7\uD7B0-\uD7C6]")
|
||||
(jongseong "[\u11A8-\u11FF\uD7CB-\uD7FB]?")
|
||||
(pattern (concat choseong jungseong jongseong)))
|
||||
(set-char-table-range composition-function-table
|
||||
'(#x1100 . #x115F)
|
||||
(list (vector pattern 0 'font-shape-gstring)))
|
||||
(set-char-table-range composition-function-table
|
||||
'(#xA960 . #xA97C)
|
||||
(list (vector pattern 0 'font-shape-gstring))))
|
||||
|
||||
(provide 'korean)
|
||||
|
||||
;;; korean.el ends here
|
||||
|
|
|
|||
Loading…
Reference in a new issue