toki/emacs-winum
1
0
Fork 0
Code Issues Pull requests Activity

change key bindings to use ~C-x w~ prefix

Browse source
This commit is contained in:
deb0ch 2016-12-15 01:12:51 +01:00
parent 75dcc93f14
commit 6da09ea7c3
2 changed files with 84 additions and 53 deletions
Download patch file Download diff file Expand all files Collapse all files

33
winum.el
View file

@ -94,21 +94,28 @@ numbers in the mode-line.")
"Face used for the number in the mode-line."
:group 'winum)
(defcustom winum-keymap-prefix (kbd "C-x w")
"Prefix key sequence for keybindings."
:group 'winum
:type 'string)
(defvar winum-keymap
(let ((map (make-sparse-keymap)))
(define-key map (kbd "C-`") 'winum-select-window-by-number)
(define-key map (kbd "M-0") 'winum-select-window-0-or-10)
(define-key map (kbd "M-1") 'winum-select-window-1)
(define-key map (kbd "M-2") 'winum-select-window-2)
(define-key map (kbd "M-3") 'winum-select-window-3)
(define-key map (kbd "M-4") 'winum-select-window-4)
(define-key map (kbd "M-5") 'winum-select-window-5)
(define-key map (kbd "M-6") 'winum-select-window-6)
(define-key map (kbd "M-7") 'winum-select-window-7)
(define-key map (kbd "M-8") 'winum-select-window-8)
(define-key map (kbd "M-9") 'winum-select-window-9)
map)
"Keymap used in by `winum-mode'.")
(let ((prefix-map (make-sparse-keymap)))
(define-key prefix-map (kbd "`") 'winum-select-window-by-number)
(define-key prefix-map (kbd "0") 'winum-select-window-0-or-10)
(define-key prefix-map (kbd "1") 'winum-select-window-1)
(define-key prefix-map (kbd "2") 'winum-select-window-2)
(define-key prefix-map (kbd "3") 'winum-select-window-3)
(define-key prefix-map (kbd "4") 'winum-select-window-4)
(define-key prefix-map (kbd "5") 'winum-select-window-5)
(define-key prefix-map (kbd "6") 'winum-select-window-6)
(define-key prefix-map (kbd "7") 'winum-select-window-7)
(define-key prefix-map (kbd "8") 'winum-select-window-8)
(define-key prefix-map (kbd "9") 'winum-select-window-9)
(define-key map winum-keymap-prefix prefix-map))
map)
"Keymap used for `winum-mode'.")
;;;###autoload
(define-minor-mode winum-mode