[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 6e275c1bf8: Don't try to toggle untogglable widgets in custom-tog
From: |
Lars Ingebrigtsen |
Subject: |
master 6e275c1bf8: Don't try to toggle untogglable widgets in custom-toggle-hide-all-variables |
Date: |
Wed, 11 May 2022 07:42:17 -0400 (EDT) |
branch: master
commit 6e275c1bf8d8fd5c276b9cfdbba9201c4e28d9b9
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
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 0870bf6782..f220256345 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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 6e275c1bf8: Don't try to toggle untogglable widgets in custom-toggle-hide-all-variables,
Lars Ingebrigtsen <=