From: Gerd Moellmann <gerd@gnu.org>
Date: Fri, 23 Jun 2000 05:56:08 +0000 (+0000)
Subject: (custom-button-face, custom-button-pressed-face):
X-Git-Tag: emacs-pretest-21.0.90~3120
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=83e7159c66fcff1fd3e0fe8adaf97514cf3549be;p=emacs.git

(custom-button-face, custom-button-pressed-face):
Specify foreground color.
---

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 9005e0a3fec..8c2a801ba77 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -1697,9 +1697,11 @@ and `face'."
 
 (defface custom-button-face
   '((((type x) (class color))		; Like default modeline
-     (:box (:line-width 2 :style released-button) :background "lightgrey"))
+     (:box (:line-width 2 :style released-button)
+	   :background "lightgrey" :foreground "black"))
     (((type w32) (class color))		; Like default modeline
-     (:box (:line-width 2 :style released-button) :background "lightgrey"))
+     (:box (:line-width 2 :style released-button)
+	   :background "lightgrey" :foreground "black"))
     (t
      nil))
   "Face used for buttons in customization buffers."
@@ -1708,9 +1710,11 @@ and `face'."
 
 (defface custom-button-pressed-face
   '((((type x) (class color))
-     (:box (:line-width 2 :style pressed-button) :background "lightgrey"))
+     (:box (:line-width 2 :style pressed-button)
+	   :background "lightgrey" :foreground "black"))
     (((type w32) (class color))
-     (:box (:line-width 2 :style pressed-button) :background "lightgrey"))
+     (:box (:line-width 2 :style pressed-button)
+	   :background "lightgrey" :foreground "black"))
     (t
      (:inverse-video t)))
   "Face used for buttons in customization buffers."