Skip to content

Commit

Permalink
* lisp/tab-bar.el (tab-bar-history-buttons-show): Remove defcustom.
Browse files Browse the repository at this point in the history
(tab-bar-format-history): Don't use this recently added variable
because now it's possible to customize the option 'tab-bar-format'
to remove 'tab-bar-format-history' from it that gives the same result.
  • Loading branch information
link0ff committed Aug 13, 2021
1 parent a9ad3d4 commit a93d164
Showing 1 changed file with 4 additions and 11 deletions.
15 changes: 4 additions & 11 deletions lisp/tab-bar.el
Original file line number Diff line number Diff line change
Expand Up @@ -398,16 +398,6 @@ If nil, don't show it at all."
(defvar tab-bar-forward-button " > "
"Button for going forward in tab history.")

(defcustom tab-bar-history-buttons-show t
"Show back and forward buttons when `tab-bar-history-mode' is enabled."
:type 'boolean
:initialize 'custom-initialize-default
:set (lambda (sym val)
(set-default sym val)
(force-mode-line-update))
:group 'tab-bar
:version "28.1")

(defcustom tab-bar-tab-hints nil
"Show absolute numbers on tabs in the tab bar before the tab name.
This helps to select the tab by its number using `tab-bar-select-tab'
Expand Down Expand Up @@ -590,7 +580,10 @@ the mode line. Replacing `tab-bar-format-tabs' with
:version "28.1")

(defun tab-bar-format-history ()
(when (and tab-bar-history-mode tab-bar-history-buttons-show)
"Show back and forward buttons when `tab-bar-history-mode' is enabled.
You can hide these buttons by customizing `tab-bar-format' and removing
`tab-bar-format-history' from it."
(when tab-bar-history-mode
`((sep-history-back menu-item ,(tab-bar-separator) ignore)
(history-back
menu-item ,tab-bar-back-button tab-bar-history-back
Expand Down

0 comments on commit a93d164

Please sign in to comment.