[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/faces.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/faces.el |
Date: |
Wed, 03 Jul 2002 03:08:43 -0400 |
Index: emacs/lisp/faces.el
diff -c emacs/lisp/faces.el:1.269 emacs/lisp/faces.el:1.270
*** emacs/lisp/faces.el:1.269 Wed Jul 3 03:03:51 2002
--- emacs/lisp/faces.el Wed Jul 3 03:08:43 2002
***************
*** 1808,1816 ****
(put 'modeline-inactive 'face-alias 'mode-line-inactive)
(defface header-line
! '((t
! :inherit mode-line)
! (((type tty))
;; This used to be `:inverse-video t', but that doesn't look very
;; good when combined with inverse-video mode-lines and multiple
;; windows. Underlining looks better, and is more consistent with
--- 1808,1814 ----
(put 'modeline-inactive 'face-alias 'mode-line-inactive)
(defface header-line
! '((((type tty))
;; This used to be `:inverse-video t', but that doesn't look very
;; good when combined with inverse-video mode-lines and multiple
;; windows. Underlining looks better, and is more consistent with
***************
*** 1820,1843 ****
;; highlighting; this may be too confusing in general, although it
;; happens to look good with the only current use of header-lines,
;; the info browser. XXX
! :underline t
! :inverse-video nil)
(((class color grayscale) (background light))
:background "grey90" :foreground "grey20"
! :box nil)
(((class color grayscale) (background dark))
:background "grey20" :foreground "grey90"
! :box nil)
(((class mono) (background light))
:background "white" :foreground "black"
:inverse-video nil
:box nil
! :underline t)
(((class mono) (background dark))
:background "black" :foreground "white"
:inverse-video nil
:box nil
! :underline t))
"Basic header-line face."
:version "21.1"
:group 'basic-faces)
--- 1818,1844 ----
;; highlighting; this may be too confusing in general, although it
;; happens to look good with the only current use of header-lines,
;; the info browser. XXX
! :underline t)
(((class color grayscale) (background light))
:background "grey90" :foreground "grey20"
! :box nil
! :inherit mode-line)
(((class color grayscale) (background dark))
:background "grey20" :foreground "grey90"
! :box nil
! :inherit mode-line)
(((class mono) (background light))
:background "white" :foreground "black"
:inverse-video nil
:box nil
! :underline t
! :inherit mode-line)
(((class mono) (background dark))
:background "black" :foreground "white"
:inverse-video nil
:box nil
! :underline t
! :inherit mode-line))
"Basic header-line face."
:version "21.1"
:group 'basic-faces)