From 6e275c1bf8d8fd5c276b9cfdbba9201c4e28d9b9 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Wed, 11 May 2022 13:42:02 +0200 Subject: [PATCH] Don't try to toggle untogglable widgets in custom-toggle-hide-all-variables * lisp/cus-edit.el (custom-toggle-hide-all-variables): Only toggle the widgets that can be toggled. --- lisp/cus-edit.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 0870bf6782f..f2202563456 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -2851,7 +2851,10 @@ try matching its doc string against `custom-guess-doc-alist'." (when-let* ((widget (widget-at (point))) (parent (widget-get widget :parent)) (state (widget-get parent :custom-state))) - (when (eq state custom--hidden-state) + (when (eq state 'changed) + (setq state 'standard)) + (when (and (eq (widget-type widget) 'custom-visibility) + (eq state custom--hidden-state)) (custom-toggle-hide-variable widget))) (forward-line 1))) (setq custom--hidden-state (if (eq custom--hidden-state 'hidden) -- 2.39.2