From: Po Lu <luangruo@yahoo.com>
Date: Fri, 26 Nov 2021 05:33:39 +0000 (+0800)
Subject: Make tab bar option visible in the menu bar on NS
X-Git-Tag: emacs-29.0.90~2852^2~26
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8887213dcf502269fb81deda640a204a801b602c;p=emacs.git

Make tab bar option visible in the menu bar on NS

* lisp/menu-bar.el (menu-bar-showhide-menu): Make
`showhide-tab-bar' visible on NS as well.
---

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 274f594f69e..8c04e35a51f 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -1347,14 +1347,13 @@ mail status in mode line"))
                               (frame-parameter (menu-bar-frame-for-menubar)
                                                'menu-bar-lines)))))
 
-    (unless (featurep 'ns)
-      (bindings--define-key menu [showhide-tab-bar]
-        '(menu-item "Tab Bar" toggle-tab-bar-mode-from-frame
-                    :help "Turn tab bar on/off"
-                    :button
-                    (:toggle . (menu-bar-positive-p
-                                (frame-parameter (menu-bar-frame-for-menubar)
-                                                 'tab-bar-lines))))))
+    (bindings--define-key menu [showhide-tab-bar]
+      '(menu-item "Tab Bar" toggle-tab-bar-mode-from-frame
+                  :help "Turn tab bar on/off"
+                  :button
+                  (:toggle . (menu-bar-positive-p
+                              (frame-parameter (menu-bar-frame-for-menubar)
+                                               'tab-bar-lines)))))
 
     (if (and (boundp 'menu-bar-showhide-tool-bar-menu)
              (keymapp menu-bar-showhide-tool-bar-menu))