Mercurial > emacs

diff lisp/faces.el @ 63594:4c33b0ac74a3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 c449f070995c
children de897c139738 5b54039912f4
line wrap: on
line diff
--- a/lisp/faces.el	Mon Jun 20 10:29:02 2005 +0000
+++ b/lisp/faces.el	Mon Jun 20 10:45:31 2005 +0000
@@ -1869,6 +1869,13 @@
   :group 'modeline
   :group 'basic-faces)
 
+(defface vertical-divider
+  '((default :inherit mode-line-inactive))
+  "Face used for vertical window dividers on ttys."
+  :version "22.1"
+  :group 'modeline
+  :group 'basic-faces)
+
 ;; Make `modeline' an alias for `mode-line', for compatibility.
 (put 'modeline 'face-alias 'mode-line)
 (put 'modeline-inactive 'face-alias 'mode-line-inactive)