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");