aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2021-10-24 22:20:15 +0300
committerJuri Linkov2021-10-24 22:22:16 +0300
commit7385a7667fda2bcc0df71def10c9e14c995ee8f9 (patch)
tree4da879620e63450f77c943125cd37a41d7e5084e
parent56caf1c9b887ccbb6d35a95ca257f633bb71d1d3 (diff)
downloademacs-7385a7667fda2bcc0df71def10c9e14c995ee8f9.tar.gz
emacs-7385a7667fda2bcc0df71def10c9e14c995ee8f9.zip
* lisp/tab-bar.el (tab-bar-move-repeat-map): Fix alias binding of tab-move.
(tab-bar-move-tab-backward): Put 'repeat-map' symbol property.
-rw-r--r--lisp/tab-bar.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index 10ff57bfd0a..10f26875db5 100644
--- a/lisp/tab-bar.el
+++ b/lisp/tab-bar.el
@@ -2378,12 +2378,13 @@ Used in `repeat-mode'.")
2378 2378
2379(defvar tab-bar-move-repeat-map 2379(defvar tab-bar-move-repeat-map
2380 (let ((map (make-sparse-keymap))) 2380 (let ((map (make-sparse-keymap)))
2381 (define-key map "m" 'tab-bar-move-tab) 2381 (define-key map "m" 'tab-move)
2382 (define-key map "M" 'tab-bar-move-tab-backward) 2382 (define-key map "M" 'tab-bar-move-tab-backward)
2383 map) 2383 map)
2384 "Keymap to repeat tab move key sequences `C-x t m m M'. 2384 "Keymap to repeat tab move key sequences `C-x t m m M'.
2385Used in `repeat-mode'.") 2385Used in `repeat-mode'.")
2386(put 'tab-move 'repeat-map 'tab-bar-move-repeat-map) 2386(put 'tab-move 'repeat-map 'tab-bar-move-repeat-map)
2387(put 'tab-bar-move-tab-backward 'repeat-map 'tab-bar-move-repeat-map)
2387 2388
2388 2389
2389(provide 'tab-bar) 2390(provide 'tab-bar)