martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Support character composition for Hangul jamo

Browse Source 
* lisp/language/korean.el: Add composition rules for conjoining
Hangul jamo.  (Bug#40502)
This commit is contained in:
Eli Zaretskii
2020-04-08 12:50:57 +03:00
parent c36792bd79
commit 4e109d1529
1 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
lisp/language/korean.el
View File

@@ -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