Ensure correct toggle menu item display

* lisp/menu-bar.el (menu-bar-make-toggle-command): Call
force-mode-line-update. (Bug#56155)
This commit is contained in:
Gerd Möllmann 2022-06-29 07:53:35 +02:00
parent a0d7caf865
commit 9c2b1d37e7

View file

@ -749,7 +749,11 @@ by \"Save Options\" in Custom buffers.")
;; interactively, because the purpose is to mark the variable as a
;; candidate for `Save Options', and we do not want to save options that
;; the user has already set explicitly in the init file.
(when interactively (customize-mark-as-set ',variable)))
(when interactively
(customize-mark-as-set ',variable))
;; Toggle menu items must make sure that the menu is updated so
;; that toggle marks are drawn in the right state.
(force-mode-line-update t))
'(menu-item ,item-name ,command :help ,help
:button (:toggle . (and (default-boundp ',variable)
(default-value ',variable)))