From c3b829a4bf7ce3c0e6e9860a7ec13977aac4d54c Mon Sep 17 00:00:00 2001 From: Maciej Szlosarczyk Date: Thu, 6 Jun 2019 21:51:13 +0300 Subject: [PATCH] Minimize use of arrow keys --- 01mac.el | 11 +++++++++++ 05prog-mode.el | 4 ++-- 2 files changed, 13 insertions(+), 2 deletions(-) diff --git a/01mac.el b/01mac.el index ff672fd..fe0bb1a 100644 --- a/01mac.el +++ b/01mac.el @@ -57,10 +57,21 @@ (global-set-key (kbd "C-c ") 'windmove-up) (global-set-key (kbd "C-c ") 'windmove-down) +;; The same, but without using arrow keys +(global-set-key (kbd "C-c [") 'windmove-left) +(global-set-key (kbd "C-c ]") 'windmove-right) +(global-set-key (kbd "C-c {") 'windmove-up) +(global-set-key (kbd "C-c }") 'windmove-down) + + ;; Switch to previous and next buffer (global-set-key (kbd "C-c s ") 'previous-buffer) (global-set-key (kbd "C-c s ") 'next-buffer) +(global-set-key (kbd "C-c s [") 'previous-buffer) +(global-set-key (kbd "C-c s ]") 'next-buffer) + + ;; Kill current buffer and window (global-set-key (kbd "C-c q") 'kill-buffer-and-window) diff --git a/05prog-mode.el b/05prog-mode.el index e1d3882..4e81f64 100644 --- a/05prog-mode.el +++ b/05prog-mode.el @@ -34,8 +34,8 @@ (delete-selection-mode 1) ;; Dash -(define-key prog-mode-map (kbd "C-d") 'dash-at-point) ;; Jump to dash definition -(define-key text-mode-map (kbd "C-d") 'dash-at-point) ;; Jump to dash definition +(define-key prog-mode-map (kbd "C-s C-d") 'dash-at-point) ;; Jump to dash definition +(define-key text-mode-map (kbd "C-s C-d") 'dash-at-point) ;; Jump to dash definition (add-to-list 'dash-at-point-mode-alist '(enh-ruby-mode . "ruby,rubygems,rails")) ;; Configure lookup for Ruby mode