]> git.eshelyaron.com Git - emacs.git/commit
Tab-line horizontal scrolling with UI buttons and commands (bug#37667)
authorJuri Linkov <juri@linkov.net>
Tue, 22 Oct 2019 21:17:27 +0000 (00:17 +0300)
committerJuri Linkov <juri@linkov.net>
Tue, 22 Oct 2019 21:17:27 +0000 (00:17 +0300)
commit095908aec4a6a414c13385c429e559a73d787ae0
tree17a647338ae239d643d288b483dabe56809957f2
parentf342f9cd267d39b3ef7d0c2a58718f4ac62f5abd
Tab-line horizontal scrolling with UI buttons and commands (bug#37667)

* etc/images/tabs/left-arrow.xpm:
* etc/images/tabs/right-arrow.xpm: New images.

* lisp/tab-line.el (tab-line-left-map, tab-line-right-map): New keymaps.
(tab-line-left-button, tab-line-right-button): New variables.
(tab-line-tab-name-function): Turn defvar into defcustom.
(tab-line-tab-name-buffer): New function.
(tab-line-tab-name-truncated-buffer): Rename from tab-line-tab-name.
(tab-line-tabs-limit): Default to nil.
(tab-line-tabs): Behavior depends on tab-line-tabs-limit.
(tab-line-format): Use window-parameter tab-line-hscroll.
Add left/right buttons.
(tab-line-hscroll): New function.
(tab-line-hscroll-right, tab-line-hscroll-left): New commands
bound to mouse-wheel.  Rebind tab-switching commands to mouse-wheel
with Ctrl-modifier.
etc/images/tabs/README
etc/images/tabs/left-arrow.xpm [new file with mode: 0644]
etc/images/tabs/right-arrow.xpm [new file with mode: 0644]
lisp/tab-line.el