From: Mark Wooding <mdw@distorted.org.uk>
Date: Mon, 28 Apr 2008 13:42:40 +0000 (+0100)
Subject: emacs: New keybindings for windmove.
X-Git-Url: https://git.distorted.org.uk/~mdw/profile/commitdiff_plain/36ef07f1c95343d8bd020b9d6b115fd6930933da

emacs: New keybindings for windmove.

The S-left etc. bindings don't work well in terminals.  Define new
bindings for C-x w left/down/up/right; and C-x w h/j/k/l.
---

diff --git a/emacs b/emacs
index d54e866..bae4138 100644
--- a/emacs
+++ b/emacs
@@ -298,6 +298,14 @@
 
 (trap
   (windmove-default-keybindings)
+  (global-set-key [?\C-x ?w left] 'windmove-left)
+  (global-set-key [?\C-x ?w ?h] 'windmove-left)
+  (global-set-key [?\C-x ?w up] 'windmove-up)
+  (global-set-key [?\C-x ?w ?k] 'windmove-up)
+  (global-set-key [?\C-x ?w down] 'windmove-down)
+  (global-set-key [?\C-x ?w ?j] 'windmove-down)
+  (global-set-key [?\C-x ?w right] 'windmove-right)
+  (global-set-key [?\C-x ?w ?l] 'windmove-right)
   (setq windmove-wrap-around t))
 (trap (iswitchb-mode))
 (global-set-key [?\M-#] 'calc-dispatch)