From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 17 Apr 2000 10:35:10 +0000 (+0000)
Subject: (custom-face, face): Unquote the lambda.
X-Git-Tag: emacs-pretest-21.0.90~4231
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8cfd634fbe676cd31d4b7009dfc572c7ad9a5cd4;p=emacs.git

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

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index a559fbe60e5..129886b67cd 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."