; Fix last change in help.el

* lisp/help.el (describe-bindings-outline-rules): Fix :type.
Reported by Robert Pluim <rpluim@gmail.com>.

diff --git a/lisp/help.el b/lisp/help.el
index 886c6e0acc831a7a03b23ca2a0f54077336ea144..4c5382ff285308e67597538c38afe8da26db568b 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -728,12 +728,17 @@ Return nil if KEYS is nil."
   :version "29.1")
 
 (defcustom describe-bindings-outline-rules '((match-regexp . "Key translations"))
-  "Visibility rules for outlines in the output buffer of `describe-bindings'.
+  "Visibility rules for outline sections of `describe-bindings'.
 This is used as the value of `outline-default-rules' in the
 output buffer of `describe-bindings' when
 `describe-bindings-outline' is non-nil, otherwise this option
 doesn't have any effect."
-  :type 'boolean
+  :type '(choice (const :tag "Hide unconditionally" nil)
+                 (set :tag "Show section unless"
+                      (cons :tag "Heading matches regexp"
+                            (const match-regexp)  string)
+                      (cons :tag "Custom function returns non-nil"
+                            (const custom-function) function)))
   :group 'help
   :version "30.1")