alx/eyebrowse
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Replace key bind prefix

Browse Source
This commit is contained in:
Vasilij Schneidermann
2014-03-03 21:36:54 +01:00
parent de6c66c1b0
commit 3a5a7dadaa
2 changed files with 11 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
eyebrowse.el
View File

@ -102,12 +102,12 @@ If t, switching to the same window config as
(defvar eyebrowse-mode-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "C-c C-' <") 'eyebrowse-prev-window-config)
(define-key map (kbd "C-c C-' >") 'eyebrowse-next-window-config)
(define-key map (kbd "C-c C-' '") 'eyebrowse-last-window-config)
(define-key map (kbd "C-c C-' \"") 'eyebrowse-close-window-config)
(define-key map (kbd "C-c C-w <") 'eyebrowse-prev-window-config)
(define-key map (kbd "C-c C-w >") 'eyebrowse-next-window-config)
(define-key map (kbd "C-c C-w '") 'eyebrowse-last-window-config)
(define-key map (kbd "C-c C-w \"") 'eyebrowse-close-window-config)
(-dotimes 10 (lambda (n)
(define-key map (kbd (s-concat "C-c C-' "
(define-key map (kbd (s-concat "C-c C-w "
(number-to-string n)))
(lambda () (interactive)
(eyebrowse-switch-to-window-config n)))))