commit 5a30b7cef81179d101b6895808da1f3b82b5fc33
parent 7edb5cb705e2dc35ed6d5910b5092170cdf58a3c
Author: Vincent Demeester <vincent@sbr.pm>
Date: Tue, 21 Nov 2023 19:27:49 +0100
tools/emacs: add some org-mode todo keywords…
… and rename reload-org-agenda-files.
Signed-off-by: Vincent Demeester <vincent@sbr.pm>
Diffstat:
1 file changed, 11 insertions(+), 1 deletion(-)
diff --git a/tools/emacs/config/config-org.el b/tools/emacs/config/config-org.el
@@ -65,6 +65,7 @@
:bind (("C-c o l" . org-store-link)
("C-c o r r" . org-refile)
("C-c o a a" . org-agenda)
+ ("C-c o a r" . vde/reload-org-agenda-files)
("C-c o s" . org-sort)
("<f12>" . org-agenda))
:hook (org-mode . vde/org-mode-hook)
@@ -79,6 +80,15 @@
(org-hide-emphasis-markers t)
(org-pretty-entities t)
(org-ellipsis "…")
+ (org-todo-keywords '((sequence "TODO(t)" "NEXT(n)" "STARTED(s)" "|" "DONE(d!)" "CANCELED(c@/!)")
+ (sequence "WAITING(w@/!)" "SOMEDAY(s)" "|" "CANCELED(c@/!)")
+ (sequence "IDEA(i)" "|" "CANCELED(c@/!)")))
+ (org-todo-state-tags-triggers '(("CANCELLED" ("CANCELLED" . t))
+ ("WAITING" ("WAITING" . t))
+ (done ("WAITING"))
+ ("TODO" ("WAITING") ("CANCELLED"))
+ ("NEXT" ("WAITING") ("CANCELLED"))
+ ("DONE" ("WAITING") ("CANCELLED"))))
:config
;; Org Babel configurations
(when (file-exists-p org-babel-library-file)
@@ -91,7 +101,7 @@
(directory-files-recursively
directory org-agenda-file-regexp))
`(,org-projects-dir ,org-areas-dir ,org-resources-dir ,org-journal-dir ,src-home-dir ,(expand-file-name "~/src/osp/tasks")))))
- (defun my/reload-org-agenda-files ()
+ (defun vde/reload-org-agenda-files ()
(interactive)
(setq org-agenda-files (my/org-agenda-files)))
(setq org-agenda-files (my/org-agenda-files)))