From: Juri Linkov Date: Wed, 24 Feb 2021 18:52:27 +0000 (+0200) Subject: * lisp/tab-bar.el: Move aliases down closer to keybindings. X-Git-Tag: emacs-28.0.90~3560 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=65f458ba5eaf7dd2fcd9526b85f3e6a846016171;p=emacs.git * lisp/tab-bar.el: Move aliases down closer to keybindings. --- 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 @@ -1278,26 +1278,6 @@ and can restore them." (remove-hook 'pre-command-hook 'tab-bar-history--pre-change) (remove-hook 'window-configuration-change-hook 'tab-bar--history-change))) - -;;; Short aliases - -(defalias 'tab-new 'tab-bar-new-tab) -(defalias 'tab-new-to 'tab-bar-new-tab-to) -(defalias 'tab-duplicate 'tab-bar-duplicate-tab) -(defalias 'tab-close 'tab-bar-close-tab) -(defalias 'tab-close-other 'tab-bar-close-other-tabs) -(defalias 'tab-undo 'tab-bar-undo-close-tab) -(defalias 'tab-select 'tab-bar-select-tab) -(defalias 'tab-switch 'tab-bar-switch-to-tab) -(defalias 'tab-next 'tab-bar-switch-to-next-tab) -(defalias 'tab-previous 'tab-bar-switch-to-prev-tab) -(defalias 'tab-last 'tab-bar-switch-to-last-tab) -(defalias 'tab-recent 'tab-bar-switch-to-recent-tab) -(defalias 'tab-move 'tab-bar-move-tab) -(defalias 'tab-move-to 'tab-bar-move-tab-to) -(defalias 'tab-rename 'tab-bar-rename-tab) -(defalias 'tab-list 'tab-switcher) - ;;; Non-graphical access to frame-local tabs (named window configurations) @@ -1703,6 +1683,26 @@ When `switch-to-buffer-obey-display-actions' is non-nil, nil "[other-tab]") (message "Display next command buffer in a new tab...")) + +;;; Short aliases and keybindings + +(defalias 'tab-new 'tab-bar-new-tab) +(defalias 'tab-new-to 'tab-bar-new-tab-to) +(defalias 'tab-duplicate 'tab-bar-duplicate-tab) +(defalias 'tab-close 'tab-bar-close-tab) +(defalias 'tab-close-other 'tab-bar-close-other-tabs) +(defalias 'tab-undo 'tab-bar-undo-close-tab) +(defalias 'tab-select 'tab-bar-select-tab) +(defalias 'tab-switch 'tab-bar-switch-to-tab) +(defalias 'tab-next 'tab-bar-switch-to-next-tab) +(defalias 'tab-previous 'tab-bar-switch-to-prev-tab) +(defalias 'tab-last 'tab-bar-switch-to-last-tab) +(defalias 'tab-recent 'tab-bar-switch-to-recent-tab) +(defalias 'tab-move 'tab-bar-move-tab) +(defalias 'tab-move-to 'tab-bar-move-tab-to) +(defalias 'tab-rename 'tab-bar-rename-tab) +(defalias 'tab-list 'tab-switcher) + (define-key tab-prefix-map "n" 'tab-duplicate) (define-key tab-prefix-map "N" 'tab-new-to) (define-key tab-prefix-map "2" 'tab-new)