From 9366b055650a7a033d67a8f155be4e35143a004e Mon Sep 17 00:00:00 2001 From: Peng Li Date: Fri, 28 Oct 2016 11:58:20 +0800 Subject: [PATCH 1/1] emacs - elscreen key bindings --- emacs.d/config.org | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/emacs.d/config.org b/emacs.d/config.org index 1be198c..a7152e1 100644 --- a/emacs.d/config.org +++ b/emacs.d/config.org @@ -1641,7 +1641,12 @@ as a http download client tool :config (elscreen-start) (set-face-attribute 'elscreen-tab-current-screen-face nil :foreground "black" :background "yellow") - (set-face-attribute 'elscreen-tab-other-screen-face nil :foreground "black" :background "disabledControlTextColor" :underline nil)) + (set-face-attribute 'elscreen-tab-other-screen-face nil :foreground "black" :background "disabledControlTextColor" :underline nil) + ;; (global-unset-key (kbd)); M-TAB switch screen + (global-set-key (kbd "s-`") (lambda () (interactive) (elscreen-goto 0))) + (dotimes (i 8) + (global-set-key (kbd (concat "s-" (number-to-string (+ i 1)))) + `(lambda () (interactive) (elscreen-goto ,(+ i 1)))))) #+END_SRC * Dired @@ -3431,3 +3436,4 @@ search music on some music web site +** Need separate the Key-bindings and package-initialization -- 2.11.0