Mercurial > emacs

changeset 99404:16c6946eeb2e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(custom-variable-value-create, custom-face): Use face names sans -face suffix rather than aliases.
author Glenn Morris <rgm@gnu.org>
date Thu, 06 Nov 2008 03:46:13 +0000
parents e0a169f45c0e
children f7a6320797a9
files lisp/cus-edit.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-edit.el	Thu Nov 06 03:40:06 2008 +0000
+++ b/lisp/cus-edit.el	Thu Nov 06 03:46:13 2008 +0000
@@ -2544,7 +2544,7 @@
 	   (push (widget-create-child-and-convert
 		  widget 'item
 		  :format "%{%t%}: "
-		  :sample-face 'custom-variable-tag-face
+		  :sample-face 'custom-variable-tag
 		  :tag tag
 		  :parent widget)
 		 buttons)
@@ -2597,8 +2597,8 @@
 		    :action 'custom-tag-action
 		    :help-echo "Change value of this option."
 		    :mouse-down-action 'custom-tag-mouse-down-action
-		    :button-face 'custom-variable-button-face
-		    :sample-face 'custom-variable-tag-face
+		    :button-face 'custom-variable-button
+		    :sample-face 'custom-variable-tag
 		    tag)
 		   buttons)
 	     (insert " ")
@@ -3226,7 +3226,7 @@
 
 (define-widget 'custom-face 'custom
   "Customize face."
-  :sample-face 'custom-face-tag-face
+  :sample-face 'custom-face-tag
   :help-echo "Set or reset this face."
   :documentation-property #'face-doc-string
   :value-create 'custom-face-value-create