Add first stage to add quick todo state set key bindings

This commit is contained in:
madmaurice 2017-10-10 21:28:58 +02:00
parent 396a9c70bf
commit d5fcab2f00

View file

@ -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)