diff options
| author | Po Lu | 2024-01-16 10:59:34 +0800 |
|---|---|---|
| committer | Po Lu | 2024-01-16 11:08:37 +0800 |
| commit | 44fcab04f6a346e602f00a6d9f5b0e6f0dbeb5e0 (patch) | |
| tree | 8f424d82d760fcb22c025280277e6012c99aa50e | |
| parent | e6a2901b1be6b4aa01f8bf0d3c6e06344ce8d366 (diff) | |
| download | emacs-44fcab04f6a346e602f00a6d9f5b0e6f0dbeb5e0.tar.gz emacs-44fcab04f6a346e602f00a6d9f5b0e6f0dbeb5e0.zip | |
Enable the system's Arabic and Khmer fonts under Android
* lisp/international/fontset.el (setup-default-fontset): If
`android', search for Arabic or Khmer fonts with script tags,
not OTF features.
| -rw-r--r-- | lisp/international/fontset.el | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el index 2c461a7f7ab..33e444507c4 100644 --- a/lisp/international/fontset.el +++ b/lisp/international/fontset.el | |||
| @@ -645,8 +645,14 @@ | |||
| 645 | (nil . "microsoft-cp1251") | 645 | (nil . "microsoft-cp1251") |
| 646 | (nil . "koi8-r")) | 646 | (nil . "koi8-r")) |
| 647 | 647 | ||
| 648 | (arabic ,(font-spec :registry "iso10646-1" | 648 | (arabic ,(if (featurep 'android) |
| 649 | :otf '(arab nil (init medi fina liga))) | 649 | ;; The Android font driver does not support the |
| 650 | ;; detection of OTF tags but all fonts installed on | ||
| 651 | ;; Android with Arabic characters provide shaping | ||
| 652 | ;; information required for displaying Arabic text. | ||
| 653 | (font-spec :registry "iso10646-1" :script 'arabic) | ||
| 654 | (font-spec :registry "iso10646-1" | ||
| 655 | :otf '(arab nil (init medi fina liga)))) | ||
| 650 | (nil . "MuleArabic-0") | 656 | (nil . "MuleArabic-0") |
| 651 | (nil . "MuleArabic-1") | 657 | (nil . "MuleArabic-1") |
| 652 | (nil . "MuleArabic-2") | 658 | (nil . "MuleArabic-2") |
| @@ -657,7 +663,9 @@ | |||
| 657 | (hebrew ,(font-spec :registry "iso10646-1" :script 'hebrew) | 663 | (hebrew ,(font-spec :registry "iso10646-1" :script 'hebrew) |
| 658 | (nil . "ISO8859-8")) | 664 | (nil . "ISO8859-8")) |
| 659 | 665 | ||
| 660 | (khmer ,(font-spec :registry "iso10646-1" :otf '(khmr nil (pres)))) | 666 | (khmer ,(if (featurep 'android) |
| 667 | (font-spec :registry "iso10646-1" :script 'khmer) | ||
| 668 | (font-spec :registry "iso10646-1" :otf '(khmr nil (pres))))) | ||
| 661 | 669 | ||
| 662 | (kana (nil . "JISX0208*") | 670 | (kana (nil . "JISX0208*") |
| 663 | (nil . "GB2312.1980-0") | 671 | (nil . "GB2312.1980-0") |