From: Stephen Berman <stephen.berman@gmx.net>
Date: Thu, 1 Aug 2024 17:28:04 +0000 (+0200)
Subject: Fix regressions in Customize caused by 'widget-unselected' face
X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~2^2~20^2~597
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=db1f749db5560611f58c000b9582174b9187e045;p=emacs.git

Fix regressions in Customize caused by 'widget-unselected' face

* lisp/wid-edit.el (widget-checklist-add-item): Don't call
'widget-specify-selected'.  (Bug#72404)  (Bug#72156)
---

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 693991a6f3e..e7e6351fcab 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -2549,7 +2549,10 @@ If the item is checked, CHOSEN is a cons whose cdr is the value."
 			    (t
 			     (widget-create-child-value
 			      widget type (car (cdr chosen)))
-                             (widget-specify-selected child)))))
+                             ;; This somehow breaks :options and other
+                             ;; Custom features.
+                             ;; (widget-specify-selected child)
+                             ))))
 	       (t
 		(error "Unknown escape `%c'" escape)))))
      ;; Update properties.