summaryrefslogtreecommitdiff
path: root/lisp/faces.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2005-06-20 10:45:31 +0000
committerMiles Bader <miles@gnu.org>2005-06-20 10:45:31 +0000
commitb4e49aee845c2666cea162e3fc83d977207392b9 (patch)
tree3e8f13584c3bc95bc2172a501ca4c5f920329872 /lisp/faces.el
parent01ba96624b41bc15d40ccb0a7095d081f0ee0e4d (diff)
downloademacs-b4e49aee845c2666cea162e3fc83d977207392b9.tar.gz
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.
Diffstat (limited to 'lisp/faces.el')
-rw-r--r--lisp/faces.el7
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/faces.el b/lisp/faces.el
index dc94beb4aa6..2942438a32a 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1869,6 +1869,13 @@ created."
: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)