Mercurial > emacs
comparison lisp/wid-edit.el @ 59131:52e7defa0669
(function): Use restricted-sexp as parent.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 27 Dec 2004 16:38:57 +0000 |
| parents | fa849ef3cf2c |
| children | 08c82797edef 95879cc1ed20 |
comparison
equal
deleted
inserted
replaced
| 59130:ba97b7508fd1 | 59131:52e7defa0669 |
|---|---|
| 3057 (error "No value")))) | 3057 (error "No value")))) |
| 3058 | 3058 |
| 3059 (defvar widget-function-prompt-value-history nil | 3059 (defvar widget-function-prompt-value-history nil |
| 3060 "History of input to `widget-function-prompt-value'.") | 3060 "History of input to `widget-function-prompt-value'.") |
| 3061 | 3061 |
| 3062 (define-widget 'function 'sexp | 3062 (define-widget 'function 'restricted-sexp |
| 3063 "A Lisp function." | 3063 "A Lisp function." |
| 3064 :complete-function (lambda () | 3064 :complete-function (lambda () |
| 3065 (interactive) | 3065 (interactive) |
| 3066 (lisp-complete-symbol 'fboundp)) | 3066 (lisp-complete-symbol 'fboundp)) |
| 3067 :prompt-value 'widget-field-prompt-value | 3067 :prompt-value 'widget-field-prompt-value |