From 5f2f17af57b79d931457073a046380cdc998f635 Mon Sep 17 00:00:00 2001
From: Nick Bowler <nbowler@draconx.ca>
Date: Tue, 5 Oct 2010 21:00:42 -0400
Subject: [PATCH] Add key binding support for Colemak.

---
 common/bindings        | 13 +++++--------
 common/keymaps/colemak |  7 +++++++
 common/keymaps/default |  1 +
 common/keymaps/qwerty  |  7 +++++++
 4 files changed, 20 insertions(+), 8 deletions(-)
 create mode 100644 common/keymaps/colemak
 create mode 120000 common/keymaps/default
 create mode 100644 common/keymaps/qwerty

diff --git a/common/bindings b/common/bindings
index 14a71b2..d9a03fa 100644
--- a/common/bindings
+++ b/common/bindings
@@ -12,14 +12,6 @@ Key F4 A M  Close
 # When programs don't set the resolution...
 Key F12 A C Exec exec xrandr -s 0
 
-# For moving windows around desktops.
-Key J WFT CM DoPageMove 0
-Key K WFT CM DoPageMove 1
-Key L WFT CM DoPageMove 2
-Key U WFT CM DoPageMove 3
-Key I WFT CM DoPageMove 4
-Key O WFT CM DoPageMove 5
-
 # For moving ourself around desktops.
 Key 1 A CM GotoPage 0 0
 Key 2 A CM GotoPage 1 0
@@ -47,3 +39,8 @@ DestroyFunc DoPageMove
 AddToFunc   DoPageMove
 + I GotoPage   $0 0
 + I MoveToPage $0 0
+
+# Keymap config
+PipeRead "[ -f '$[FVWM_USERDIR]/common/keymaps/$[KEYMAP]' ] \
+          && echo Read common/keymaps/$[KEYMAP] \
+	  || echo Read common/keymaps/default"
diff --git a/common/keymaps/colemak b/common/keymaps/colemak
new file mode 100644
index 0000000..ddbd008
--- /dev/null
+++ b/common/keymaps/colemak
@@ -0,0 +1,7 @@
+# For moving windows around desktops.
+Key N WFT CM DoPageMove 0
+Key E WFT CM DoPageMove 1
+Key I WFT CM DoPageMove 2
+Key L WFT CM DoPageMove 3
+Key U WFT CM DoPageMove 4
+Key Y WFT CM DoPageMove 5
diff --git a/common/keymaps/default b/common/keymaps/default
new file mode 120000
index 0000000..f228909
--- /dev/null
+++ b/common/keymaps/default
@@ -0,0 +1 @@
+qwerty
\ No newline at end of file
diff --git a/common/keymaps/qwerty b/common/keymaps/qwerty
new file mode 100644
index 0000000..e742132
--- /dev/null
+++ b/common/keymaps/qwerty
@@ -0,0 +1,7 @@
+# For moving windows around desktops.
+Key J WFT CM DoPageMove 0
+Key K WFT CM DoPageMove 1
+Key L WFT CM DoPageMove 2
+Key U WFT CM DoPageMove 3
+Key I WFT CM DoPageMove 4
+Key O WFT CM DoPageMove 5
-- 
2.43.2