]> git.eshelyaron.com Git - emacs.git/commit
* lisp/tab-bar.el: Simplify internal functions.
authorJuri Linkov <juri@linkov.net>
Tue, 16 Mar 2021 17:53:27 +0000 (19:53 +0200)
committerJuri Linkov <juri@linkov.net>
Tue, 16 Mar 2021 17:53:27 +0000 (19:53 +0200)
commit126ea102a542c04b007c2229b004a360544be5da
tree931b0813d7f6ef101d8bd45b316d360cd61cd72e
parentc209a0f82825dacd7edeef34b31f458499307eef
* lisp/tab-bar.el: Simplify internal functions.

* lisp/tab-bar.el (tab-bar-tabs-set): New function.
(tab-bar-tabs): Use tab-bar--current-tab-find and tab-bar-tabs-set.
(tab-bar--tab): Use tab-bar--current-tab-find.
(tab-bar--current-tab): Remove unused line (assq 'current-tab ...)
because there is no current-tab when it's called.  Remove unused arg 'frame'.
(tab-bar--current-tab-find): Simplify.
(tab-bar-move-tab-to, tab-bar-move-tab-to-frame)
(tab-bar-new-tab-to, tab-bar-close-tab)
(tab-bar-close-other-tabs, tab-bar-undo-close-tab)
(tab-switcher-delete-from-list): Use tab-bar-tabs-set
instead of set-frame-parameter.
(tab-bar-close-group-tabs): Simplify using tab-bar--current-tab-find
without arg.
lisp/tab-bar.el