keyboard-layout: uniform indentation

This commit is contained in:
Eivind Fonn 2017-06-08 09:52:27 +02:00
parent 6255081645
commit c2a20210e6

View file

@ -34,77 +34,85 @@ case.")
;;------------------------------------------------------------------------------ ;;------------------------------------------------------------------------------
(defvar kl--base-rebinding-maps (defvar kl--base-rebinding-maps
'((bepo . (("c" . "h") '((bepo
("t" . "j") . (("c" . "h")
("s" . "k") ("t" . "j")
("r" . "l") ("s" . "k")
;; ("r" . "l")
("h" . "r") ;;
("j" . "t") ("h" . "r")
("k" . "s") ("j" . "t")
("l" . "c"))) ("k" . "s")
(dvp . (("d" . "h") ("l" . "c")))
("h" . "j") (dvp
("t" . "k") . (("d" . "h")
("n" . "l") ("h" . "j")
;; ("t" . "k")
("j" . "d") ("n" . "l")
("k" . "t") ;;
("l" . "n"))) ("j" . "d")
(dvorak . (("h" . "h") ("k" . "t")
("t" . "j") ("l" . "n")))
("n" . "k") (dvorak
("s" . "l") . (("h" . "h")
;; ("t" . "j")
("h" . "h") ("n" . "k")
("j" . "t") ("s" . "l")
("k" . "n") ;;
("l" . "s"))) ("h" . "h")
(workman . (("y" . "h") ("j" . "t")
("n" . "j") ("k" . "n")
("e" . "k") ("l" . "s")))
("o" . "l") (workman
;; . (("y" . "h")
("h" . "y") ("n" . "j")
("j" . "n") ("e" . "k")
("k" . "e") ("o" . "l")
("l" . "o"))) ;;
(neo . (("s" . "h") ("h" . "y")
("n" . "j") ("j" . "n")
("r" . "k") ("k" . "e")
("t" . "l") ("l" . "o")))
;; (neo
("l" . "s") . (("s" . "h")
("j" . "n") ("n" . "j")
("h" . "r") ("r" . "k")
("k" . "t"))) ("t" . "l")
(colemak-neio . (("n" . "h") ;;
("e" . "j") ("l" . "s")
("i" . "k") ("j" . "n")
("o" . "l") ("h" . "r")
;; ("k" . "t")))
("h" . "n") (colemak-neio
("j" . "e") . (("n" . "h")
("k" . "i") ("e" . "j")
("l" . "o"))) ("i" . "k")
(colemak-hnei . (("h" . "h") ("o" . "l")
("n" . "j") ;;
("e" . "k") ("h" . "n")
("i" . "l") ("j" . "e")
;; ("k" . "i")
("h" . "h") ("l" . "o")))
("j" . "n") (colemak-hnei
("k" . "e") . (("h" . "h")
("l" . "i"))) ("n" . "j")
(colemak-jkhl . (("j" . "h") ("e" . "k")
("k" . "j") ("i" . "l")
("h" . "k") ;;
("l" . "l") ("h" . "h")
;; ("j" . "n")
("h" . "j") ("k" . "e")
("j" . "k") ("l" . "i")))
("k" . "h") (colemak-jkhl
("l" . "l")))) . (("j" . "h")
("k" . "j")
("h" . "k")
("l" . "l")
;;
("h" . "j")
("j" . "k")
("k" . "h")
("l" . "l"))))
"The base rebinding map. Dots should be read as `will behave "The base rebinding map. Dots should be read as `will behave
as'. It should be a bidirectional mapping, i.e. all present keys as'. It should be a bidirectional mapping, i.e. all present keys
should be once in each column.") should be once in each column.")