Mercurial > hg > xemacs-beta
comparison src/faces.c @ 3747:c13b89ba4796
[xemacs-hg @ 2006-12-17 11:25:58 by aidan]
Don't use the server-side fallbacks for XFT.
author | aidan |
---|---|
date | Sun, 17 Dec 2006 11:26:09 +0000 |
parents | f6f6fc9eb269 |
children | d6f975442bd3 |
comparison
equal
deleted
inserted
replaced
3746:8052943fe6a7 | 3747:c13b89ba4796 |
---|---|
2305 define_specifier_tag(Qfinal, Qnil, | 2305 define_specifier_tag(Qfinal, Qnil, |
2306 intern ("specifier-tag-final-stage-p")); | 2306 intern ("specifier-tag-final-stage-p")); |
2307 | 2307 |
2308 define_specifier_tag (Qencode_as_utf_8, Qnil, | 2308 define_specifier_tag (Qencode_as_utf_8, Qnil, |
2309 intern("specifier-tag-encode-as-utf-8-p")); | 2309 intern("specifier-tag-encode-as-utf-8-p")); |
2310 | |
2311 #endif /* MULE */ | 2310 #endif /* MULE */ |
2312 | 2311 |
2312 #ifdef USE_XFT | |
2313 for (fontptr = fonts + countof(fonts) - 1; fontptr >= fonts; fontptr--) | |
2314 inst_list = Fcons (Fcons (list1 (device_symbol), | |
2315 build_string (*fontptr)), | |
2316 inst_list); | |
2317 | |
2318 #else /* !USE_XFT */ | |
2313 inst_list = | 2319 inst_list = |
2314 Fcons | 2320 Fcons |
2315 (Fcons | 2321 (Fcons |
2316 (list1 (device_symbol), | 2322 (list1 (device_symbol), |
2317 build_string ("*")), | 2323 build_string ("*")), |
2318 inst_list); | 2324 inst_list); |
2319 | |
2320 #ifdef MULE | 2325 #ifdef MULE |
2321 | 2326 |
2322 /* For Han characters and Ethiopic, we want the misc-fixed font used to | 2327 /* For Han characters and Ethiopic, we want the misc-fixed font used to |
2323 be distinct from that for alphabetic scripts, because the font | 2328 be distinct from that for alphabetic scripts, because the font |
2324 specified below is distractingly ugly when used for Han characters | 2329 specified below is distractingly ugly when used for Han characters |
2386 Fcons | 2391 Fcons |
2387 (Fcons | 2392 (Fcons |
2388 (list1 (device_symbol), | 2393 (list1 (device_symbol), |
2389 build_string ("-*-lucidatypewriter-medium-r-*-*-*-120-*-*-*-*-*-*")), | 2394 build_string ("-*-lucidatypewriter-medium-r-*-*-*-120-*-*-*-*-*-*")), |
2390 inst_list); | 2395 inst_list); |
2396 | |
2397 #endif /* !USE_XFT */ | |
2391 | 2398 |
2392 #endif /* HAVE_X_WINDOWS || HAVE_GTK */ | 2399 #endif /* HAVE_X_WINDOWS || HAVE_GTK */ |
2393 | 2400 |
2394 #ifdef HAVE_TTY | 2401 #ifdef HAVE_TTY |
2395 inst_list = Fcons (Fcons (list1 (Qtty), build_string ("normal")), | 2402 inst_list = Fcons (Fcons (list1 (Qtty), build_string ("normal")), |