Start getting ready for tarmak switch.

global.org

@@ -562,15 +562,37 @@
      :session nil "/org/xkbvleds" "org.xkbvleds" "indicatorChanged"
           'xkbvleds-indicator-signal-handler)
   #+END_SRC
+** Tarmak-ready
+   Set up all possible combinations of modifiers
+   #+BEGIN_SRC emacs-lisp
+     (defun concat-recursive (b &optional a)
+       (if b
+           (append (concat-recursive (cdr b) (concat a (car b)))
+                   (concat-recursive (cdr b) a))
+         (when a (list a))))
+
+     (setq modifier-combo (concat-recursive '("C-" "M-" "s-" "H-")))
+   #+END_SRC
+   Then list the swapped keys
+   #+BEGIN_SRC emacs-lisp
+     (setq tarmak1-swaps '(("j" . "e")
+                           ("e" . "k")
+                           ("k" . "n")
+                           ("n" . "j")))
+   #+END_SRC
+
 * Main major modes
 ** org-mode
 *** Require
     Require the ~org~ package; I also occasionally use org-pomodoro
     #+BEGIN_SRC emacs-lisp
-      (with-eval-after-load "org"
-        (define-key org-src-mode-map (kbd "C-c C-c") 'org-edit-src-exit))
-      (require 'org)
-      (require 'org-pomodoro)
+            (with-eval-after-load "org"
+              (define-key org-src-mode-map (kbd "C-c C-c") 'org-edit-src-exit)
+              (define-key org-src-mode-map (kbd "C-c C-k") nil) ;this conflicts with my LaTeX bindings
+              (define-key org-src-mode-map (kbd "C-c C-`") 'org-edit-src-abort)
+      )
+            (require 'org)
+            (require 'org-pomodoro)
     #+END_SRC
 *** Hooks
     Enable ~auto-fill-mode~ (see