mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-06 22:41:06 -08:00
Fix checkbox's child creation
* lisp/wid-edit.el (widget-checklist-add-item): Swap function calls so that child is actually a widget. (Bug#72156)
This commit is contained in:
parent
26c5fadf47
commit
d66b8d4bec
1 changed files with 3 additions and 6 deletions
|
|
@ -2550,12 +2550,9 @@ If the item is checked, CHOSEN is a cons whose cdr is the value."
|
||||||
(widget-create-child-value
|
(widget-create-child-value
|
||||||
widget type (cdr chosen)))
|
widget type (cdr chosen)))
|
||||||
(t
|
(t
|
||||||
|
(widget-specify-selected child)
|
||||||
(widget-create-child-value
|
(widget-create-child-value
|
||||||
widget type (car (cdr chosen)))
|
widget type (car (cdr chosen)))))))
|
||||||
;; This somehow breaks :options and other
|
|
||||||
;; Custom features.
|
|
||||||
;; (widget-specify-selected child)
|
|
||||||
))))
|
|
||||||
(t
|
(t
|
||||||
(error "Unknown escape `%c'" escape)))))
|
(error "Unknown escape `%c'" escape)))))
|
||||||
;; Update properties.
|
;; Update properties.
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue