From 8cfd634fbe676cd31d4b7009dfc572c7ad9a5cd4 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 17 Apr 2000 10:35:10 +0000 Subject: (custom-face, face): Unquote the lambda. --- lisp/cus-edit.el | 5 ++--- 1 file 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." -- cgit v1.2.3