Mercurial > hg > xemacs-beta
comparison lisp/cus-edit.el @ 4021:cef5f57bb9e2
[xemacs-hg @ 2007-06-21 13:39:08 by aidan]
'(lambda ...) -> #'(lambda ...), for the sake of style and the byte
compiler.
| author | aidan |
|---|---|
| date | Thu, 21 Jun 2007 13:39:36 +0000 |
| parents | b4a8cd0dd8df |
| children | e687f1912d5b |
comparison
equal
deleted
inserted
replaced
| 4020:77df2f1e36fd | 4021:cef5f57bb9e2 |
|---|---|
| 2542 | 2542 |
| 2543 (define-widget 'custom-face 'custom | 2543 (define-widget 'custom-face 'custom |
| 2544 "Customize face." | 2544 "Customize face." |
| 2545 :sample-face 'custom-face-tag-face | 2545 :sample-face 'custom-face-tag-face |
| 2546 :help-echo "Set or reset this face" | 2546 :help-echo "Set or reset this face" |
| 2547 :documentation-property '(lambda (face) | 2547 :documentation-property #'(lambda (face) |
| 2548 (face-doc-string face)) | 2548 (face-doc-string face)) |
| 2549 :value-create 'custom-face-value-create | 2549 :value-create 'custom-face-value-create |
| 2550 :action 'custom-face-action | 2550 :action 'custom-face-action |
| 2551 :custom-category 'face | 2551 :custom-category 'face |
| 2552 :custom-form nil ; defaults to value of `custom-face-default-form' | 2552 :custom-form nil ; defaults to value of `custom-face-default-form' |
| 2553 :custom-set 'custom-face-set | 2553 :custom-set 'custom-face-set |