(header-line): Tweak face.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8efb523be63327af694c8160ca606eb5ba61043a..06b3c739d0f8673c3647fee7d67bb5d4833ba6f9 100644 (file)
--- 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 d50600c4a6c6eb970f3f36a2a646ca89dc445576..4d0083a276f08b5c19763cd24e2e5293327c1259 100644 (file)
--- 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)