From d5fcab2f00e7f9beed0e99fa039dc6d064930cd0 Mon Sep 17 00:00:00 2001
From: Valentin Gehrke <madmaurice@zom.bi>
Date: Tue, 10 Oct 2017 21:28:58 +0200
Subject: [PATCH] Add first stage to add quick todo state set key bindings

---
 emacs/.emacs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/emacs/.emacs b/emacs/.emacs
index be72f18..6cae1bd 100644
--- a/emacs/.emacs
+++ b/emacs/.emacs
@@ -175,6 +175,10 @@
                   org-level-4
                   org-level-5))
     (set-face-attribute face nil :weight 'semi-bold :height 1.0))
+  ;; (dolist (kv
+  ;;          '(("t" . "TODO")
+  ;;            ("r" . "REVIEW")))
+  ;;   (define-key org-mode-map (kbd (concat "C-c t " (car kv))) (lambda () `(org-todo ,(cdr kv)))))
   (add-hook 'org-mode-hook
             (lambda ()
               (linum-mode 0)