diff options
| author | Stefan Monnier <[email protected]> | 2000-04-17 10:35:10 +0000 |
|---|---|---|
| committer | Stefan Monnier <[email protected]> | 2000-04-17 10:35:10 +0000 |
| commit | 8cfd634fbe676cd31d4b7009dfc572c7ad9a5cd4 (patch) | |
| tree | a82e9e35b88cf515c951cccdd21743115bf86aed /lisp/cus-edit.el | |
| parent | 8d2259b9a2cff2b69cd830d658af59acdd08e4ec (diff) | |
(custom-face, face): Unquote the lambda.
Diffstat (limited to 'lisp/cus-edit.el')
| -rw-r--r-- | lisp/cus-edit.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index a559fbe60e..129886b67c 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -2547,8 +2547,7 @@ Match frames with dark backgrounds.") "Customize face." :sample-face 'custom-face-tag-face :help-echo "Set or reset this face." - :documentation-property '(lambda (face) - (face-doc-string face)) + :documentation-property (lambda (face) (face-doc-string face)) :value-create 'custom-face-value-create :action 'custom-face-action :custom-category 'face @@ -2889,7 +2888,7 @@ restoring it to the state of a face that has never been customized." :value-get 'widget-value-value-get :validate 'widget-children-validate :action 'widget-face-action - :match '(lambda (widget value) (symbolp value))) + :match (lambda (widget value) (symbolp value))) (defun widget-face-value-create (widget) "Create a `custom-face' child." |