diff options
author | Gregory Heytings <gregory@heytings.org> | 2021-10-28 20:58:02 +0000 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2021-10-29 10:33:36 +0300 |
commit | 3da9fa875bbfceee41df38d9f97e06013484a791 (patch) | |
tree | 19cd33cb14fbec182042374f9e9304f0138f40ce /lisp/language | |
parent | 928e05f2d63564284eb51a7102f96439c1b87d9f (diff) | |
download | emacs-3da9fa875bbfceee41df38d9f97e06013484a791.tar.gz emacs-3da9fa875bbfceee41df38d9f97e06013484a791.tar.bz2 emacs-3da9fa875bbfceee41df38d9f97e06013484a791.zip |
Make hieroglyphs display correctly with existing fonts
* etc/HELLO: Remove hieroglyph format control characters.
* lisp/language/misc-lang.el: Add a rule to compose Egyptian
hieroglyphs even without Unicode format control characters.
Diffstat (limited to 'lisp/language')
-rw-r--r-- | lisp/language/misc-lang.el | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/lisp/language/misc-lang.el b/lisp/language/misc-lang.el index a2ca678b2be..de4f092dc13 100644 --- a/lisp/language/misc-lang.el +++ b/lisp/language/misc-lang.el @@ -192,7 +192,20 @@ thin (i.e. 1-dot width) space." composition-function-table #x13437 (list (vector "\U00013437[\U00013000-\U0001343F]+" - 0 #'egyptian-shape-grouping)))) + 0 #'egyptian-shape-grouping))) + ;; As of late 2021, Egyptian Hieroglyph Format Controls are not yet + ;; supported in existing fonts and shaping engines, but some fonts + ;; do provide ligatures with which texts in Egyptian Hieroglyphs are + ;; correctly displayed. If and when these format controls are + ;; supported, the five lines below (which cancel the effect of the + ;; above lines) can be removed, and the entry in etc/HELLO can be + ;; restored to: + ;; Egyptian Hieroglyphs (𓂋𓏤𓈖𓆎𓅓𓏏𓊖) 𓅓𓊵𓏏𓊪, 𓇍𓇋𓂻𓍘𓇋 + (set-char-table-range + composition-function-table + '(#x13000 . #x1342E) + (list (vector "[\U00013000-\U0001342E]+" + 0 #'font-shape-gstring)))) (provide 'misc-lang) |