diff options
| author | Juri Linkov | 2021-02-24 20:52:27 +0200 |
|---|---|---|
| committer | Juri Linkov | 2021-02-24 20:53:25 +0200 |
| commit | 65f458ba5eaf7dd2fcd9526b85f3e6a846016171 (patch) | |
| tree | 9c83c4345fe61531a5a51543208f2b8e5483956d | |
| parent | 24be523fde01e61ab8bff785f272645b59dc60f3 (diff) | |
| download | emacs-65f458ba5eaf7dd2fcd9526b85f3e6a846016171.tar.gz emacs-65f458ba5eaf7dd2fcd9526b85f3e6a846016171.zip | |
* lisp/tab-bar.el: Move aliases down closer to keybindings.
| -rw-r--r-- | lisp/tab-bar.el | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el index 3b1fc89f30d..c95559a1b7d 100644 --- a/lisp/tab-bar.el +++ b/lisp/tab-bar.el | |||
| @@ -1279,26 +1279,6 @@ and can restore them." | |||
| 1279 | (remove-hook 'window-configuration-change-hook 'tab-bar--history-change))) | 1279 | (remove-hook 'window-configuration-change-hook 'tab-bar--history-change))) |
| 1280 | 1280 | ||
| 1281 | 1281 | ||
| 1282 | ;;; Short aliases | ||
| 1283 | |||
| 1284 | (defalias 'tab-new 'tab-bar-new-tab) | ||
| 1285 | (defalias 'tab-new-to 'tab-bar-new-tab-to) | ||
| 1286 | (defalias 'tab-duplicate 'tab-bar-duplicate-tab) | ||
| 1287 | (defalias 'tab-close 'tab-bar-close-tab) | ||
| 1288 | (defalias 'tab-close-other 'tab-bar-close-other-tabs) | ||
| 1289 | (defalias 'tab-undo 'tab-bar-undo-close-tab) | ||
| 1290 | (defalias 'tab-select 'tab-bar-select-tab) | ||
| 1291 | (defalias 'tab-switch 'tab-bar-switch-to-tab) | ||
| 1292 | (defalias 'tab-next 'tab-bar-switch-to-next-tab) | ||
| 1293 | (defalias 'tab-previous 'tab-bar-switch-to-prev-tab) | ||
| 1294 | (defalias 'tab-last 'tab-bar-switch-to-last-tab) | ||
| 1295 | (defalias 'tab-recent 'tab-bar-switch-to-recent-tab) | ||
| 1296 | (defalias 'tab-move 'tab-bar-move-tab) | ||
| 1297 | (defalias 'tab-move-to 'tab-bar-move-tab-to) | ||
| 1298 | (defalias 'tab-rename 'tab-bar-rename-tab) | ||
| 1299 | (defalias 'tab-list 'tab-switcher) | ||
| 1300 | |||
| 1301 | |||
| 1302 | ;;; Non-graphical access to frame-local tabs (named window configurations) | 1282 | ;;; Non-graphical access to frame-local tabs (named window configurations) |
| 1303 | 1283 | ||
| 1304 | (defun tab-switcher () | 1284 | (defun tab-switcher () |
| @@ -1703,6 +1683,26 @@ When `switch-to-buffer-obey-display-actions' is non-nil, | |||
| 1703 | nil "[other-tab]") | 1683 | nil "[other-tab]") |
| 1704 | (message "Display next command buffer in a new tab...")) | 1684 | (message "Display next command buffer in a new tab...")) |
| 1705 | 1685 | ||
| 1686 | |||
| 1687 | ;;; Short aliases and keybindings | ||
| 1688 | |||
| 1689 | (defalias 'tab-new 'tab-bar-new-tab) | ||
| 1690 | (defalias 'tab-new-to 'tab-bar-new-tab-to) | ||
| 1691 | (defalias 'tab-duplicate 'tab-bar-duplicate-tab) | ||
| 1692 | (defalias 'tab-close 'tab-bar-close-tab) | ||
| 1693 | (defalias 'tab-close-other 'tab-bar-close-other-tabs) | ||
| 1694 | (defalias 'tab-undo 'tab-bar-undo-close-tab) | ||
| 1695 | (defalias 'tab-select 'tab-bar-select-tab) | ||
| 1696 | (defalias 'tab-switch 'tab-bar-switch-to-tab) | ||
| 1697 | (defalias 'tab-next 'tab-bar-switch-to-next-tab) | ||
| 1698 | (defalias 'tab-previous 'tab-bar-switch-to-prev-tab) | ||
| 1699 | (defalias 'tab-last 'tab-bar-switch-to-last-tab) | ||
| 1700 | (defalias 'tab-recent 'tab-bar-switch-to-recent-tab) | ||
| 1701 | (defalias 'tab-move 'tab-bar-move-tab) | ||
| 1702 | (defalias 'tab-move-to 'tab-bar-move-tab-to) | ||
| 1703 | (defalias 'tab-rename 'tab-bar-rename-tab) | ||
| 1704 | (defalias 'tab-list 'tab-switcher) | ||
| 1705 | |||
| 1706 | (define-key tab-prefix-map "n" 'tab-duplicate) | 1706 | (define-key tab-prefix-map "n" 'tab-duplicate) |
| 1707 | (define-key tab-prefix-map "N" 'tab-new-to) | 1707 | (define-key tab-prefix-map "N" 'tab-new-to) |
| 1708 | (define-key tab-prefix-map "2" 'tab-new) | 1708 | (define-key tab-prefix-map "2" 'tab-new) |