(mode-line-inactive, header-line): Add the :inherit

attribute for the tty case.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 14f99c756fb514fb0bde41cb6a7b561dea9f4bcd..8047982ccac449a4a5383c738fda3d67d182de1a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-02-17  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * faces.el (mode-line-inactive, header-line): Add the :inherit
+       attribute for the tty case.
+
 2002-02-17  stanislav shalunov  <shalunov@internet2.edu>
 
        * mail/uce.el (uce-reply-to-uce): Fix incorrect behavior when

diff --git a/lisp/faces.el b/lisp/faces.el
index be8f6e601e32a8066839ccd424e9c064565ab7ff..9e2d35016cbbb4430c3685420ea2c39219595c92 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1725,6 +1725,7 @@ created."
      :box (:line-width -1 :color "grey40" :style nil)
      :foreground "grey80" :background "grey30")
     (t
+     :inherit mode-line
      :inverse-video t))
   "Basic mode line face for non-selected windows."
   :version "21.2"
@@ -1746,6 +1747,7 @@ created."
      ;; 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
+     :inherit mode-line
      :underline t)
     (((class color grayscale) (background light))
      :inherit mode-line