(custom-variable-value-create, custom-face):
Use face names sans -face suffix rather than aliases.
This commit is contained in:
@@ -1,3 +1,9 @@
|
||||
2008-11-06 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* cus-edit.el (custom-comment-tag): Doc fix.
|
||||
(custom-comment, custom-variable-value-create, custom-face):
|
||||
Use face names sans -face suffix rather than aliases.
|
||||
|
||||
2008-11-05 Jay Belanger <jay.p.belanger@gmail.com>
|
||||
|
||||
* calc/calc.el (calc-quit): Use `window-full-width-p' to check
|
||||
|
||||
@@ -2544,7 +2544,7 @@ try matching its doc string against `custom-guess-doc-alist'."
|
||||
(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 @@ try matching its doc string against `custom-guess-doc-alist'."
|
||||
: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 @@ Only match frames that support the specified face attributes.")
|
||||
|
||||
(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
|
||||
|
||||
Reference in New Issue
Block a user