From b2a671f53e56808fdc945b8405236f8d9126e2fa Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Tue, 8 Nov 2022 08:48:29 -0700 Subject: revert to customising transient-cycles-window-buffers-cycle-... keys We can use customisation comments to indicate what the numbers mean. --- .emacs.d/init.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 46efa01c..7ecd2e03 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -402,6 +402,8 @@ windows side-by-side in the frame." '(tramp-verbose 1 nil nil "Manual says this should improve performance.") '(transient-cycles-buffer-siblings-mode t) '(transient-cycles-tab-bar-mode t) + '(transient-cycles-window-buffers-cycle-backwards-key [134217777] nil nil "M-1.") + '(transient-cycles-window-buffers-cycle-forwards-key [134217780] nil nil "M-4.") '(transient-cycles-window-buffers-mode t) '(transient-mark-mode nil) '(uniquify-buffer-name-style 'post-forward nil (uniquify)) @@ -1346,8 +1348,6 @@ don't consider windows satisfying the predicate EXCLUDE." (define-key transient-cycles-window-buffers-mode-map "\M-1" #'previous-buffer) (define-key transient-cycles-window-buffers-mode-map "\M-4" #'next-buffer) -(setopt transient-cycles-window-buffers-cycle-backwards-key [?\M-1] - transient-cycles-window-buffers-cycle-forwards-key [?\M-4]) ;; Start transient cycling among the current buffer's siblings. ;; Can be usefully prefixed with C-x 4 4 etc. to start cycling elsewhere. -- cgit v1.2.3