From 52adaff763893d7da9dc8bc503ddd33fae2a796b Mon Sep 17 00:00:00 2001 From: jao Date: Tue, 1 Nov 2022 23:53:55 +0000 Subject: less obtrusive repeat map for previous window --- init.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/init.el b/init.el index a062791..199afd1 100644 --- a/init.el +++ b/init.el @@ -967,15 +967,14 @@ (defvar jao-prev-window-repeat-map (let ((map (make-sparse-keymap))) (define-key map "p" 'jao-prev-window) - (define-key map "o" (lambda () + (define-key map "P" (lambda () (interactive) (setq repeat-map 'jao-prev-window-repeat-map) (other-window 1))) map) "Keymap to repeat `prev-window' key sequences. Used in `repeat-mode'.") -(put 'jao-prev-window 'repeat-map jao-prev-window-repeat-map) -(define-key other-window-repeat-map "p" 'jao-prev-window) +(put 'jao-prev-window 'repeat-map jao-prev-window-repeat-map) (mapc (lambda (n) (global-set-key (format "\C-c%s" (1+ n)) (jao-nth-window n))) @@ -3211,7 +3210,7 @@ (defun jao-global-keybindings () (interactive) (global-set-key (kbd "") #'magit-status) - (global-set-key (kbd "C-x p") #'switch-window) + (global-set-key (kbd "C-x p") #'jao-prev-window) (global-set-key (kbd "C-x o") 'other-window) (global-set-key "\C-cj" #'join-line) (global-set-key "\C-cn" #'next-error) -- cgit v1.2.3