From d1bd4b129c045b23b7d93847b4a9287d230cf66e Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 6 Feb 2004 11:12:09 +0000 Subject: [PATCH] (setup-default-fontset): Delete the entry for symbol script, add JISX0213 to kana script, specify fallback fonts. --- lisp/international/fontset.el | 26 ++++++++++++++++---------- 1 file changed, 16 insertions(+), 10 deletions(-) diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el index c0e8942e759..5135fb1a554 100644 --- a/lisp/international/fontset.el +++ b/lisp/international/fontset.el @@ -163,16 +163,12 @@ (hebrew (nil . "ISO8859-8")) - (symbol (nil . "ISO10646-1") - (nil . "GB2312.1980-0") - (nil . "JISX0208*") - (nil . "JISX0212*") - (nil . "big5*")) - (kana (nil . "JISX0208*") (nil . "GB2312.1980-0") (nil . "KSC5601.1987*") - (nil . "JISX0201*")) + (nil . "JISX0201*") + (nil . "JISX0213.2000-1") + (nil . "JISX0213.2004-1")) (bopomofo (nil . "sisheng_cwnn-0")) @@ -243,18 +239,28 @@ ;;(devanagari-glyph ("altsys-dv_ttsurekh" . "devanagari-cdac")) ;;(malayalam-glyph ("altsys-ml_ttkarthika" . "malayalam-cdac")) (ipa (nil . "MuleIPA-1")) + + ;; Fallback fonts + (nil (nil . "gb2312.1980") + (nil . "jisx0208") + (nil . "ksc5601.1987") + (nil . "cns11643.1992.*1") + (nil . "big5") + (nil . "jisx0213.2000-1") + (nil . "jisx0213.2004-1") + (nil . "jisx0212")) )) ;; Append Unicode fonts. ;; This may find fonts with more variants (bold, italic) but which ;; don't cover many characters. - (set-fontset-font "fontset-default" '(0 . #xFFFF) + (set-fontset-font "fontset-default" nil '(nil . "iso10646-1") nil 'append) ;; These may find fonts that cover many characters but with fewer ;; variants. - (set-fontset-font "fontset-default" '(0 . #xFFFF) + (set-fontset-font "fontset-default" nil '("gnu-unifont" . "iso10646-1") nil 'append) - (set-fontset-font "fontset-default" '(0 . #xFFFF) + (set-fontset-font "fontset-default" nil '("mutt-clearlyu" . "iso10646-1") nil 'append)) ;; These are the registered registries/encodings from -- 2.39.5