diff options
| author | Po Lu <luangruo@yahoo.com> | 2021-11-26 13:33:39 +0800 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2021-11-26 13:33:39 +0800 |
| commit | 8887213dcf502269fb81deda640a204a801b602c (patch) | |
| tree | 6fc288cb4fe4a907638a73965c5cea5131bff569 /lisp/menu-bar.el | |
| parent | 897a101cd3b7d6b46e3b14e80e3c77373246be6a (diff) | |
| download | emacs-8887213dcf502269fb81deda640a204a801b602c.tar.gz | |
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.
Diffstat (limited to 'lisp/menu-bar.el')
| -rw-r--r-- | lisp/menu-bar.el | 15 |
1 files changed, 7 insertions, 8 deletions
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)) |