diff options
| -rw-r--r-- | lisp/faces.el | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 9b52c03ab7e..822a7bbf686 100644 --- a/lisp/faces.el +++ b/lisp/faces.el | |||
| @@ -79,10 +79,15 @@ ALTERNATIVE2 etc." | |||
| 79 | 79 | ||
| 80 | ;; This is defined originally in xfaces.c. | 80 | ;; This is defined originally in xfaces.c. |
| 81 | (defcustom face-font-registry-alternatives | 81 | (defcustom face-font-registry-alternatives |
| 82 | '(("gb2312.1980" "gb2312.80&gb8565.88" "gbk*") | 82 | (if (eq system-type 'windows-nt) |
| 83 | ("jisx0208.1990" "jisx0208.1983" "jisx0208.1978") | 83 | '(("gb2312.1980" "gb2312") |
| 84 | ("ksc5601.1989" "ksx1001.1992" "ksc5601.1987") | 84 | ("jisx0208.1990" "jisx0208.1983" "jisx0208.1978") |
| 85 | ("muletibetan-2" "muletibetan-0")) | 85 | ("ksc5601.1989" "ksx1001.1992" "ksc5601.1987") |
| 86 | ("muletibetan-2" "muletibetan-0")) | ||
| 87 | '(("gb2312.1980" "gb2312.80&gb8565.88" "gbk*") | ||
| 88 | ("jisx0208.1990" "jisx0208.1983" "jisx0208.1978") | ||
| 89 | ("ksc5601.1989" "ksx1001.1992" "ksc5601.1987") | ||
| 90 | ("muletibetan-2" "muletibetan-0"))) | ||
| 86 | "*Alist of alternative font registry names. | 91 | "*Alist of alternative font registry names. |
| 87 | Each element has the the form (REGISTRY ALTERNATIVE1 ALTERNATIVE2 ...). | 92 | Each element has the the form (REGISTRY ALTERNATIVE1 ALTERNATIVE2 ...). |
| 88 | If fonts of registry REGISTRY can be loaded, font selection | 93 | If fonts of registry REGISTRY can be loaded, font selection |