commit 5b3f8cd8064d901094ef0b7e51985507aca29279 parent e6ce18d0316caa9c29482d137d861ee0e51f4159 Author: Vincent Demeester <vincent@sbr.pm> Date: Fri, 9 Aug 2024 17:43:05 +0200 tools/emacs: set some custom agendas Signed-off-by: Vincent Demeester <vincent@sbr.pm> Diffstat:
| M | tools/emacs/config/config-org.el | | | 27 | ++++++++++++++++++++++++++- |
1 file changed, 26 insertions(+), 1 deletion(-)
diff --git a/tools/emacs/config/config-org.el b/tools/emacs/config/config-org.el @@ -194,7 +194,32 @@ (--map `(,it :maxlevel . 3))))) (setq org-agenda-files (vde/org-agenda-files) ;; TODO: extract org-refile-targets into a function - org-refile-targets (vde/org-refile-targets))) + org-refile-targets (vde/org-refile-targets)) + (setq org-agenda-custom-commands + '(("d" "Daily Agenda" + ((agenda "" + ((org-agenda-span 'day) + (org-deadline-warning-days 5))) + (tags-todo "+PRIORITY=\"A\"" + ((org-agenda-overriding-header "High Priority Tasks"))) + (tags-todo "+NEXT" + ((org-agenda-overriding-header "Next Tasks"))))) + ("i" "Inbox (triage)" + ((tags-todo ".*" + ((org-agenda-files '("~/desktop/org/20231120T124316--inbox__inbox.org")) + (org-agenda-overriding-header "Unprocessed Inbox Item"))))) + ("u" "Untagged Tasks" + ((tags-todo "-{.*}" + ((org-agenda-overriding-header "Untagged tasks"))))) + ("w" "Weekly Review" + ((agenda "" + ((org-agenda-overriding-header "Completed Tasks") + (org-agenda-skip-function '(org-agenda-skip-entry-if 'nottodo 'done)) + (org-agenda-span 'week))) + (agenda "" + ((org-agenda-overriding-header "Unfinished Scheduled Tasks") + (org-agenda-skip-function '(org-agenda-skip-entry-if 'todo 'done)) + (org-agenda-span 'week)))))))) ;; Make sure we load org-protocol (use-package org-protocol