Mercurial > emacs
comparison src/xfaces.c @ 63594:4c33b0ac74a3
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-435
Implement tty vertical-divider face
2005-06-20 Miles Bader <miles@gnu.org>
* lisp/faces.el (vertical-divider): New face.
2005-06-20 Miles Bader <miles@gnu.org>
* man/display.texi (Faces): Add `vertical-divider'.
2005-06-20 Miles Bader <miles@gnu.org>
* src/xfaces.c (Qvertical_divider): New variable.
(realize_basic_faces): Realize its face.
(syms_of_xfaces): Initialize it.
* src/dispextern.h (enum face_id): Add `VERTICAL_DIVIDER_FACE_ID'.
* src/dispnew.c (build_frame_matrix_from_leaf_window): Display vertical
window-separator on ttys using `vertical-divider' face by default.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Mon, 20 Jun 2005 10:45:31 +0000 |
parents | c4a3a3afa8ce |
children | cb0d171c8273 5b54039912f4 |
comparison
equal
deleted
inserted
replaced
63593:5300b48844ca | 63594:4c33b0ac74a3 |
---|---|
322 | 322 |
323 /* Names of basic faces. */ | 323 /* Names of basic faces. */ |
324 | 324 |
325 Lisp_Object Qdefault, Qtool_bar, Qregion, Qfringe; | 325 Lisp_Object Qdefault, Qtool_bar, Qregion, Qfringe; |
326 Lisp_Object Qheader_line, Qscroll_bar, Qcursor, Qborder, Qmouse, Qmenu; | 326 Lisp_Object Qheader_line, Qscroll_bar, Qcursor, Qborder, Qmouse, Qmenu; |
327 Lisp_Object Qmode_line_inactive; | 327 Lisp_Object Qmode_line_inactive, Qvertical_divider; |
328 extern Lisp_Object Qmode_line; | 328 extern Lisp_Object Qmode_line; |
329 | 329 |
330 /* The symbol `face-alias'. A symbols having that property is an | 330 /* The symbol `face-alias'. A symbols having that property is an |
331 alias for another face. Value of the property is the name of | 331 alias for another face. Value of the property is the name of |
332 the aliased face. */ | 332 the aliased face. */ |
6880 realize_named_face (f, Qscroll_bar, SCROLL_BAR_FACE_ID); | 6880 realize_named_face (f, Qscroll_bar, SCROLL_BAR_FACE_ID); |
6881 realize_named_face (f, Qborder, BORDER_FACE_ID); | 6881 realize_named_face (f, Qborder, BORDER_FACE_ID); |
6882 realize_named_face (f, Qcursor, CURSOR_FACE_ID); | 6882 realize_named_face (f, Qcursor, CURSOR_FACE_ID); |
6883 realize_named_face (f, Qmouse, MOUSE_FACE_ID); | 6883 realize_named_face (f, Qmouse, MOUSE_FACE_ID); |
6884 realize_named_face (f, Qmenu, MENU_FACE_ID); | 6884 realize_named_face (f, Qmenu, MENU_FACE_ID); |
6885 realize_named_face (f, Qvertical_divider, VERTICAL_DIVIDER_FACE_ID); | |
6885 | 6886 |
6886 /* Reflect changes in the `menu' face in menu bars. */ | 6887 /* Reflect changes in the `menu' face in menu bars. */ |
6887 if (FRAME_FACE_CACHE (f)->menu_face_changed_p) | 6888 if (FRAME_FACE_CACHE (f)->menu_face_changed_p) |
6888 { | 6889 { |
6889 FRAME_FACE_CACHE (f)->menu_face_changed_p = 0; | 6890 FRAME_FACE_CACHE (f)->menu_face_changed_p = 0; |
8009 staticpro (&Qborder); | 8010 staticpro (&Qborder); |
8010 Qmouse = intern ("mouse"); | 8011 Qmouse = intern ("mouse"); |
8011 staticpro (&Qmouse); | 8012 staticpro (&Qmouse); |
8012 Qmode_line_inactive = intern ("mode-line-inactive"); | 8013 Qmode_line_inactive = intern ("mode-line-inactive"); |
8013 staticpro (&Qmode_line_inactive); | 8014 staticpro (&Qmode_line_inactive); |
8015 Qvertical_divider = intern ("vertical-divider"); | |
8016 staticpro (&Qvertical_divider); | |
8014 Qtty_color_desc = intern ("tty-color-desc"); | 8017 Qtty_color_desc = intern ("tty-color-desc"); |
8015 staticpro (&Qtty_color_desc); | 8018 staticpro (&Qtty_color_desc); |
8016 Qtty_color_standard_values = intern ("tty-color-standard-values"); | 8019 Qtty_color_standard_values = intern ("tty-color-standard-values"); |
8017 staticpro (&Qtty_color_standard_values); | 8020 staticpro (&Qtty_color_standard_values); |
8018 Qtty_color_by_index = intern ("tty-color-by-index"); | 8021 Qtty_color_by_index = intern ("tty-color-by-index"); |