Mercurial > hg > xemacs-beta
comparison src/faces.c @ 209:41ff10fd062f r20-4b3
Import from CVS: tag r20-4b3
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:04:58 +0200 |
parents | e45d5e7c476e |
children | 78f53ef88e17 |
comparison
equal
deleted
inserted
replaced
208:f427b8ec4379 | 209:41ff10fd062f |
---|---|
1914 fg_inst_list = Fcons (Fcons (list1 (Qtty), Fvector (0, 0)), | 1914 fg_inst_list = Fcons (Fcons (list1 (Qtty), Fvector (0, 0)), |
1915 fg_inst_list); | 1915 fg_inst_list); |
1916 bg_inst_list = Fcons (Fcons (list1 (Qtty), Fvector (0, 0)), | 1916 bg_inst_list = Fcons (Fcons (list1 (Qtty), Fvector (0, 0)), |
1917 bg_inst_list); | 1917 bg_inst_list); |
1918 #endif | 1918 #endif |
1919 #ifdef HAVE_W32GUI | |
1920 fg_inst_list = Fcons (Fcons (list1 (Qw32), build_string ("black")), | |
1921 fg_inst_list); | |
1922 bg_inst_list = Fcons (Fcons (list1 (Qw32), build_string ("white")), | |
1923 bg_inst_list); | |
1924 #endif | |
1919 set_specifier_fallback (Fget (Vdefault_face, Qforeground, Qnil), | 1925 set_specifier_fallback (Fget (Vdefault_face, Qforeground, Qnil), |
1920 fg_inst_list); | 1926 fg_inst_list); |
1921 set_specifier_fallback (Fget (Vdefault_face, Qbackground, Qnil), | 1927 set_specifier_fallback (Fget (Vdefault_face, Qbackground, Qnil), |
1922 bg_inst_list); | 1928 bg_inst_list); |
1923 } | 1929 } |
1958 | 1964 |
1959 #ifdef HAVE_TTY | 1965 #ifdef HAVE_TTY |
1960 inst_list = Fcons (Fcons (list1 (Qtty), build_string ("normal")), | 1966 inst_list = Fcons (Fcons (list1 (Qtty), build_string ("normal")), |
1961 inst_list); | 1967 inst_list); |
1962 #endif /* HAVE_TTY */ | 1968 #endif /* HAVE_TTY */ |
1969 #ifdef HAVE_W32GUI | |
1970 inst_list = Fcons (Fcons (list1 (Qw32), build_string ("Courier New")), | |
1971 inst_list); | |
1972 #endif /* HAVE_W32GUI */ | |
1963 set_specifier_fallback (Fget (Vdefault_face, Qfont, Qnil), inst_list); | 1973 set_specifier_fallback (Fget (Vdefault_face, Qfont, Qnil), inst_list); |
1964 } | 1974 } |
1965 | 1975 |
1966 set_specifier_fallback (Fget (Vdefault_face, Qunderline, Qnil), | 1976 set_specifier_fallback (Fget (Vdefault_face, Qunderline, Qnil), |
1967 list1 (Fcons (Qnil, Qnil))); | 1977 list1 (Fcons (Qnil, Qnil))); |