diff --git a/global.org b/global.org index 7d8daa4..69d3299 100644 --- a/global.org +++ b/global.org @@ -2242,17 +2242,17 @@ Set up all possible combinations of modifiers #+end_src Then list the swapped keys #+begin_src emacs-lisp - (setq tarmak1-swap-alist '(("j" . "e") - ("e" . "k") - ("k" . "n") - ("n" . "j"))) - (setq tarmak2-swap-alist '(("j" . "g") - ("g" . "t") - ("t" . "f") - ("f" . "e") - ("e" . "k") - ("k" . "n") - ("n" . "j"))) + (setq tarmak1-swap-alist '((?j . ?e) + (?e . ?k) + (?k . ?n) + (?n . ?j))) + (setq tarmak2-swap-alist '((?j . ?g) + (?g . ?t) + (?t . ?f) + (?f . ?e) + (?e . ?k) + (?k . ?n) + (?n . ?j))) #+end_src #+begin_src emacs-lisp @@ -2285,9 +2285,9 @@ Set up all possible combinations of modifiers (mapcan (lambda (swap-pair) (mapcar (lambda (mod-combo) (cons (concat mod-combo - (car swap-pair)) + (string (car swap-pair))) (concat mod-combo - (cdr swap-pair)))) + (string (cdr swap-pair))))) modifier-combo)) tarmak2-swap-alist)))