master 0a01b998d13: * lisp/menu-bar.el (menu-bar-showhide-menu): Add "Outlines" (bug#68979).

[Juri Linkov]

branch: master
commit 0a01b998d13027e5672592f9e60919aa683bad9e
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>

    * lisp/menu-bar.el (menu-bar-showhide-menu): Add "Outlines" (bug#68979).
    
    The menu item "Outlines" toggles 'outline-minor-mode' when one
    of outline-search-function/outline-regexp/outline-level is defined
    in the current buffer.
---
 lisp/menu-bar.el | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 47c6a8f0613..5b290899ff5 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -1353,6 +1353,15 @@ mail status in mode line"))
                                   (frame-visible-p
                                    (symbol-value 'speedbar-frame))))))
 
+    (bindings--define-key menu [showhide-outline-minor-mode]
+      '(menu-item "Outlines" outline-minor-mode
+                  :help "Turn outline-minor-mode on/off"
+                  :visible (seq-some #'local-variable-p
+                                     '(outline-search-function
+                                       outline-regexp outline-level))
+                  :button (:toggle . (and (boundp 'outline-minor-mode)
+                                          outline-minor-mode))))
+
     (bindings--define-key menu [showhide-tab-line-mode]
       '(menu-item "Window Tab Line" global-tab-line-mode
                   :help "Turn window-local tab-lines on/off"