Mercurial > emacs

changeset 29879:61b75f20b058

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(custom-button-face, custom-button-pressed-face): Specify foreground color.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 23 Jun 2000 05:56:08 +0000
parents dc466af33ca4
children 3f21e1b9cc2e
files lisp/cus-edit.el
diffstat 1 files changed, 8 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-edit.el	Fri Jun 23 05:32:45 2000 +0000
+++ b/lisp/cus-edit.el	Fri Jun 23 05:56:08 2000 +0000
@@ -1697,9 +1697,11 @@
 
 (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 @@
 
 (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."