(header-line): Tweak face.

2 files changed, 5 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8efb523be63..06b3c739d0f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2000-09-18  Miles Bader  <miles@gnu.org>
 
+        * info.el (info-node, info-xref): Add dark-background variants.
+
         * faces.el (header-line): Change defaults to be less confusing
         when mixed with mode-lines.
 
@@ -7,7 +9,7 @@
         Add extra `help-echo' and `local-map' props to node xrefs.
         Use header-specific faces for node-names & xrefs.
         (Info-use-header-line): New variable.
-        (info-header, info-header-xref, info-header-node): New faces.
+        (info-header-xref, info-header-node): New faces.
         (Info-setup-header-line): New function.
         (Info-select-node): Call Info-setup-header-line when enabled.
         (Info-extract-pointer): Work even if the header line is hidden.
diff --git a/lisp/faces.el b/lisp/faces.el
index d50600c4a6c..4d0083a276f 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1533,11 +1533,11 @@ created."
      (:inverse-video t))
     (((class color) (background light))
      (:box (:line-width 1 :style released-button)
-           :background "grey90"
+           :background "grey90" :foreground "grey20"
            :inherit mode-line))
     (((class color) (background dark))
      (:box (:line-width 1 :style released-button)
-           :background "grey20"
+           :background "grey20" :foreground "grey90"
            :inherit mode-line))
     (((class mono))
      (:box (:line-width 1 :style released-button)