summaryrefslogtreecommitdiff
path: root/lisp/language
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2023-04-23 17:04:56 +0300
committerEli Zaretskii <eliz@gnu.org>2023-04-23 17:04:56 +0300
commit965c5e0231c859eaa78f372c538a5478f6bd0ad1 (patch)
tree155a6a6a396be98ca11e302b534af30203c86372 /lisp/language
parent9a0f10b5f88667261bafc65ccdd63bdd9ef80147 (diff)
downloademacs-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.el14
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