diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2024-03-21 12:08:02 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2024-03-21 12:08:02 -0400 |
| commit | 129bc91a2c9b7a6e314b4a5a4c60c266ca1cac0f (patch) | |
| tree | 8c2698eb5e45278342b8ca273efa0765bdf74528 /lisp/emacs-lisp | |
| parent | 3a902db97a99525b6f54100dc45a8cffcd3c5c8e (diff) | |
| download | emacs-129bc91a2c9b7a6e314b4a5a4c60c266ca1cac0f.tar.gz emacs-129bc91a2c9b7a6e314b4a5a4c60c266ca1cac0f.tar.bz2 emacs-129bc91a2c9b7a6e314b4a5a4c60c266ca1cac0f.zip | |
wid-edit.el: Cosmetic changes
* lisp/wid-edit.el: Use #' to quote function names.
(widget--simplify-menu, widget-echo-help): Explicitly specify the
lexenv to `eval`.
(widget-choose, widget-get-sibling, widget-setup, widget-field-find)
(widget-choice-action, widget-checklist-value-get)
(widget-radio-value-create, widget-radio-value-set)
(widget-radio-action, widget-editable-list-delete-at)
(widget-group-value-create, widget-choice-prompt-value): Use `dolist`.
(widget-convert): Hoist `(setq current` out of the ifs.
(widget-convert): Hoist `(setq keys` out of the if.
(widget-after-change): Hoist `(setq begin` out of the if.
(widget-default-completions): Use `cond`.
(widget-default-value-set): Hoist `goto-char` out of the if.
(widget-choice-action): Hoist `nth` out of the if.
(widget-checkbox-action): Hoist `widget-apply` out of the if.
(widget-editable-list-value-create): Hoist `car` out of the if.
(widget-editable-list-entry-create): Hoist `(setq child ...` out of the if.
(widget-documentation-link-action): Fold `if` into `cond`.
(widget-key-sequence-value-to-external): Use `key-parse`.
(widget-plist-convert-option, widget-alist-convert-option):
Hoist `(setq key-type` out of the if.
Diffstat (limited to 'lisp/emacs-lisp')
0 files changed, 0 insertions, 0 deletions