Mercurial > emacs

changeset 32883:105ad8d20e29

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(custom-button-face, custom-button-pressed-face): Merge x w32 and mac definitions.
author Jason Rumney <jasonr@gnu.org>
date Wed, 25 Oct 2000 18:45:11 +0000
parents ea7ff2803d21
children f677903fb663
files lisp/cus-edit.el
diffstat 1 files changed, 2 insertions(+), 14 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-edit.el	Wed Oct 25 18:44:01 2000 +0000
+++ b/lisp/cus-edit.el	Wed Oct 25 18:45:11 2000 +0000
@@ -1705,13 +1705,7 @@
 ;;; The `custom' Widget.
 
 (defface custom-button-face
-  '((((type x) (class color))		; Like default modeline
-     (: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" :foreground "black"))
-    (((type mac) (class color))		; Like default modeline
+  '((((type x w32 mac) (class color))		; Like default modeline
      (:box (:line-width 2 :style released-button)
 	   :background "lightgrey" :foreground "black"))
     (t
@@ -1721,13 +1715,7 @@
   :group 'custom-faces)
 
 (defface custom-button-pressed-face
-  '((((type x) (class color))
-     (:box (:line-width 2 :style pressed-button)
-	   :background "lightgrey" :foreground "black"))
-    (((type w32) (class color))
-     (:box (:line-width 2 :style pressed-button)
-	   :background "lightgrey" :foreground "black"))
-    (((type mac) (class color))
+  '((((type x w32 mac) (class color))
      (:box (:line-width 2 :style pressed-button)
 	   :background "lightgrey" :foreground "black"))
     (t