Add first stage to add quick todo state set key bindings
This commit is contained in:
parent
396a9c70bf
commit
d5fcab2f00
1 changed files with 4 additions and 0 deletions
|
@ -175,6 +175,10 @@
|
||||||
org-level-4
|
org-level-4
|
||||||
org-level-5))
|
org-level-5))
|
||||||
(set-face-attribute face nil :weight 'semi-bold :height 1.0))
|
(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
|
(add-hook 'org-mode-hook
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(linum-mode 0)
|
(linum-mode 0)
|
||||||
|
|
Loading…
Reference in a new issue