(custom-face, face): Unquote the lambda.

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index a559fbe60e51ca45ed188f509f5750d43268ee04..129886b67cd2c698476711c9834c45ef2fe564e5 100644 (file)
--- 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."