aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMauro Aranda2025-01-01 08:22:45 -0300
committerEli Zaretskii2025-01-11 13:54:15 +0200
commitd66b8d4becb6804d3bd912a000dc64ccfdbe6810 (patch)
tree4fd016509252d4c84f515d2a8e7a9af26970d2b7
parent26c5fadf474a56d56064899bc3447bba6d3c3037 (diff)
downloademacs-d66b8d4becb6804d3bd912a000dc64ccfdbe6810.tar.gz
emacs-d66b8d4becb6804d3bd912a000dc64ccfdbe6810.zip
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)
-rw-r--r--lisp/wid-edit.el9
1 files changed, 3 insertions, 6 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 3a7413f943c..8e6d0ed3664 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -2550,12 +2550,9 @@ If the item is checked, CHOSEN is a cons whose cdr is the value."
2550 (widget-create-child-value 2550 (widget-create-child-value
2551 widget type (cdr chosen))) 2551 widget type (cdr chosen)))
2552 (t 2552 (t
2553 (widget-create-child-value 2553 (widget-specify-selected child)
2554 widget type (car (cdr chosen))) 2554 (widget-create-child-value
2555 ;; This somehow breaks :options and other 2555 widget type (car (cdr chosen)))))))
2556 ;; Custom features.
2557 ;; (widget-specify-selected child)
2558 ))))
2559 (t 2556 (t
2560 (error "Unknown escape `%c'" escape))))) 2557 (error "Unknown escape `%c'" escape)))))
2561 ;; Update properties. 2558 ;; Update properties.