removed triggers and top down DONE state enforcement
This commit is contained in:
parent
3aad920ff1
commit
e114a114d2
9
conf.el
9
conf.el
|
@ -262,15 +262,6 @@
|
||||||
("HOLD" :foreground "violet" :weight bold)
|
("HOLD" :foreground "violet" :weight bold)
|
||||||
("CANCELLED" :foreground "deep sky blue" :weight bold))))
|
("CANCELLED" :foreground "deep sky blue" :weight bold))))
|
||||||
|
|
||||||
(setq org-todo-state-tags-triggers
|
|
||||||
(quote (("CANCELLED" ("CANCELLED" . t))
|
|
||||||
("WAITING" ("WAITING" . t))
|
|
||||||
("HOLD" ("WAITING") ("HOLD" . t))
|
|
||||||
(done ("WAITING") ("HOLD"))
|
|
||||||
("TODO" ("WAITING") ("CANCELLED") ("HOLD"))
|
|
||||||
("NEXT" ("WAITING") ("CANCELLED") ("HOLD"))
|
|
||||||
("DONE" ("WAITING") ("CANCELLED") ("HOLD")))))
|
|
||||||
|
|
||||||
(setq org-tag-alist (quote ((:startgroup)
|
(setq org-tag-alist (quote ((:startgroup)
|
||||||
("@errand" . ?e)
|
("@errand" . ?e)
|
||||||
("@work" . ?o)
|
("@work" . ?o)
|
||||||
|
|
20
conf.org
20
conf.org
|
@ -405,26 +405,6 @@ vim is all about escape, not...ctrl+g???
|
||||||
("HOLD" :foreground "violet" :weight bold)
|
("HOLD" :foreground "violet" :weight bold)
|
||||||
("CANCELLED" :foreground "deep sky blue" :weight bold))))
|
("CANCELLED" :foreground "deep sky blue" :weight bold))))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
*** triggers
|
|
||||||
#+BEGIN_SRC emacs-lisp
|
|
||||||
(setq org-todo-state-tags-triggers
|
|
||||||
(quote (("CANCELLED" ("CANCELLED" . t))
|
|
||||||
("WAITING" ("WAITING" . t))
|
|
||||||
("HOLD" ("WAITING") ("HOLD" . t))
|
|
||||||
(done ("WAITING") ("HOLD"))
|
|
||||||
("TODO" ("WAITING") ("CANCELLED") ("HOLD"))
|
|
||||||
("NEXT" ("WAITING") ("CANCELLED") ("HOLD"))
|
|
||||||
("DONE" ("WAITING") ("CANCELLED") ("HOLD")))))
|
|
||||||
#+END_SRC
|
|
||||||
*** subtask autocomplete
|
|
||||||
+BEGIN_SRC emacs-lisp
|
|
||||||
(defun org-summary-todo (n-done n-not-done)
|
|
||||||
"Switch entry to DONE when all subentries are done, to TODO otherwise."
|
|
||||||
(let (org-log-done org-log-states) ; turn off logging
|
|
||||||
(org-todo (if (= n-not-done 0) "DONE" "TODO"))))
|
|
||||||
|
|
||||||
(add-hook 'org-after-todo-statistics-hook 'org-summary-todo)
|
|
||||||
#+END_SRC
|
|
||||||
** tag selection keys
|
** tag selection keys
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(setq org-tag-alist (quote ((:startgroup)
|
(setq org-tag-alist (quote ((:startgroup)
|
||||||
|
|
Loading…
Reference in New Issue