Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fix widget relationship in customize-themes

Browse source 
* lisp/cus-theme.el (customize-themes): The theme button should
be a sibling of the checkbox widget, not a child.  (Bug#77096)
This commit is contained in:
Mauro Aranda 2025-04-02 08:10:18 -03:00
parent 71b3298c0e
commit 9cfc01056e
1 changed files with 7 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
lisp/cus-theme.el
View file

@ -654,12 +654,13 @@ Theme files are named *-theme.el in `"))
:help-echo help-echo
:action #'custom-theme-checkbox-toggle))
(push (cons theme widget) custom--listed-themes)
(widget-create-child-and-convert widget 'push-button
:button-face-get 'ignore
:mouse-face-get 'ignore
:value (format " %s" theme)
:action #'widget-parent-action
:help-echo help-echo)
(widget-create 'push-button
:button-face-get 'ignore
:mouse-face-get 'ignore
:value (format " %s" theme)
:action (lambda (_w &optional event)
(custom-theme-checkbox-toggle widget event))
:help-echo help-echo)
(widget-insert " -- "
(propertize (custom-theme-summary theme)
'face 'shadow)