summaryrefslogtreecommitdiff
path: root/lisp/language
diff options
context:
space:
mode:
authorGregory Heytings <gregory@heytings.org>2021-10-28 20:58:02 +0000
committerEli Zaretskii <eliz@gnu.org>2021-10-29 10:33:36 +0300
commit3da9fa875bbfceee41df38d9f97e06013484a791 (patch)
tree19cd33cb14fbec182042374f9e9304f0138f40ce /lisp/language
parent928e05f2d63564284eb51a7102f96439c1b87d9f (diff)
downloademacs-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.el15
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)