dotfiles

commit 216bef6cc96ef6a3b6fbdb10eaae4681df3f3ed5
parent 59a9a48b5e397d78efd52209a103f02676dfa2ea
Author: Alex Balgavy <alex@balgavy.eu>
Date:   Wed,  4 Jan 2023 16:50:10 +0100

emacs: for a project, when an item is done, automatically mark next

Diffstat:
M
emacs/config.org
 | 
23
+++++++++++++++++++----

1 file changed, 19 insertions(+), 4 deletions(-)
diff --git a/emacs/config.org b/emacs/config.org
@@ -1750,6 +1750,25 @@ In calfw, I don't want to show habits:
   (add-hook 'cfw:calendar-mode-hook (setq-local org-agenda-skip-function 'za/skip-if-habit))
 #+end_src
 
+*** Automatically mark next project item as NEXT
+Unless the current item is a project, when a project item is done, the next item in the project should be marked "NEXT".
+I tried org-edna but I couldn't get it working after an hour of effort. So a bit of lisp is the easier solution.
+
+#+begin_src emacs-lisp
+  (defun za/gtd-auto-next ()
+    "Automatically mark project item as next."
+    (save-excursion
+      (org-back-to-heading)
+      (when (and (member org-state org-done-keywords)
+                 (not (member "PROJECT" (org-get-tags nil 'local)))
+                 (member "PROJECT" (let ((org-use-tag-inheritance t))
+                                     (org-get-tags nil))))
+        (when (org-goto-sibling)
+          (org-entry-put (point) "TODO" "NEXT")))))
+
+  (add-hook #'org-after-todo-state-change-hook #'za/gtd-auto-next)
+#+end_src
+
 *** Logging for tasks
 I want to log into the LOGBOOK drawer (useful when I want to take quick notes):
 
@@ -2142,10 +2161,6 @@ This way, I can just check my calendar.
 
 Maybe check [[https://old.reddit.com/r/orgmode/comments/8rl8ep/making_orgcaldav_useable/e0sb5j0/][this]] for a way to sync on save.
 
-*** org-contrib
-#+begin_src emacs-lisp
-  (use-package org-checklist :after org-contrib :ensure org-contrib)
-#+end_src
 *** org-ref
 #+begin_src emacs-lisp
   (use-package org-ref)