diff options
author | Eli Zaretskii <eliz@gnu.org> | 2023-04-23 17:04:56 +0300 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2023-04-23 17:04:56 +0300 |
commit | 965c5e0231c859eaa78f372c538a5478f6bd0ad1 (patch) | |
tree | 155a6a6a396be98ca11e302b534af30203c86372 /lisp/language | |
parent | 9a0f10b5f88667261bafc65ccdd63bdd9ef80147 (diff) | |
download | emacs-965c5e0231c859eaa78f372c538a5478f6bd0ad1.tar.gz emacs-965c5e0231c859eaa78f372c538a5478f6bd0ad1.tar.bz2 emacs-965c5e0231c859eaa78f372c538a5478f6bd0ad1.zip |
Fix rendering of Traditional Mongolian script
* lisp/international/characters.el: Set punctuation syntax for Po
characters from the Mongolian block
* lisp/international/fontset.el (setup-default-fontset): Add
fontset setting for Traditional Mongolic.
* lisp/language/misc-lang.el (composition-function-table): Add
rules for Traditional Mongolic. (Bug#63028)
Diffstat (limited to 'lisp/language')
-rw-r--r-- | lisp/language/misc-lang.el | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/lisp/language/misc-lang.el b/lisp/language/misc-lang.el index fe283e8769c..5a7867f14e8 100644 --- a/lisp/language/misc-lang.el +++ b/lisp/language/misc-lang.el @@ -339,6 +339,20 @@ Coptic language using the Coptic script is supported in this language environment.")) '("Misc")) +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; Traditional Mongolian +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +(set-char-table-range + composition-function-table + '(#x1820 . #x18AF) + (list (vector "[\u200C\u200D][\u1820-\u18AF][\u200C\u200D]?" + 1 'font-shape-gstring) + (vector "[\u1820-\u18AF][\u200C\u200D]" 0 'font-shape-gstring) + (vector "[\u1820-\u18AF\u202F\u180B-\u180F\u1807]+" + 0 'font-shape-gstring))) + + (provide 'misc-lang) ;;; misc-lang.el ends here |