From 735eee69c274ef1b47b4dc764aa06aa5fca58ae4 Mon Sep 17 00:00:00 2001 From: rearman Date: Thu, 5 Mar 2026 09:56:55 -0500 Subject: [PATCH] more tweaks for capturing and filtering --- re/re-org.el | 54 +++++++++++++++++++++++++++++++++++++--------------- 1 file changed, 39 insertions(+), 15 deletions(-) diff --git a/re/re-org.el b/re/re-org.el index a78232f..66885ee 100644 --- a/re/re-org.el +++ b/re/re-org.el @@ -43,17 +43,30 @@ (setq org-todo-keywords '((sequence "TODO(t)" "WAITING(w@)" "UNDERTAKEN(u)" "MEETING(m)" "|" - "DONE(d)" "BELAYED(b)" "GIVEN(g)" "MET(M)"))) + "DONE(d)" "BELAYED(b)" "GIVEN(g@)" "MET(M)"))) -(setq org-tag-alist '((:startgroup . nil) +(setq org-tag-alist '((:startgroup . nil) ; contexts ("email" . ?m) ("call" . ?c) ("epicor" . ?e) ("software" . ?s) ("jobpc" . ?j) ("errand" . ?r) + ("writ" . ?w) + ("eintranet" . ?t) (:endgroup . nil) - ("troubleshoot" . ?t))) + ("troubleshoot" . ?t) + ("update" . ?u) + ("bugfix" . ?b) + (:startgroup . nil) ; people to contact + ("mikec" . nil) + ("mechanical" . nil) + ("electrical" . nil) + ("service" . nil) + ("psm" . nil) + ("pm" . nil) + ("amy" . nil) + (:endgroup . nil))) (setq org-agenda-restore-windows-after-quit t org-agenda-start-on-weekday nil @@ -70,14 +83,25 @@ (setq org-agenda-custom-commands '(("i" "Inbox" tags "inbox" ((org-agenda-overriding-header "INBOX:"))) - ("n" "Next Actions" ((tags-todo "email" ((org-agenda-overriding-header "EMAILS:"))) - (tags-todo "call"((org-agenda-overriding-header "CALLS:"))) - (tags-todo "errand" ((org-agenda-overriding-header "ERRANDS:"))) - (tags-todo "epicor"((org-agenda-overriding-header "EPICOR:"))) - (tags-todo "jobpc"((org-agenda-overriding-header "JOB PCS:"))) - (tags-todo "software"((org-agenda-overriding-header "SOFTWARE:"))) - (tags-todo "troubleshoot" ((org-agenda-overriding-header "TROUBLESHOOT:"))) - (tags-todo "TAGS=\"\"/-UNDERTAKEN-MEETING" + ("n" "Next Actions" ((tags-todo "email-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "EMAILS:"))) + (tags-todo "call-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "CALLS:"))) + (tags-todo "errand-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "ERRANDS:"))) + (tags-todo "epicor-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "EPICOR:"))) + (tags-todo "eintranet-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "EINTRANET:"))) + (tags-todo "jobpc-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "JOB PCS:"))) + (tags-todo "software-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "SOFTWARE:"))) + (tags-todo "troubleshoot-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "TROUBLESHOOT:"))) + (tags-todo "writ-recurring/-UNDERTAKEN-MEETING-WAITING" + ((org-agenda-overriding-header "WRITS:"))) + (tags-todo "ALLTAGS=\"\"/-UNDERTAKEN-MEETING-WAITING" ((org-agenda-overriding-header "UNCATEGORIZED:"))))) ("u" "Undertakings" todo "UNDERTAKEN" ((org-agenda-overriding-header "UNDERTAKINGS:"))) ("w" "Waiting" todo "WAITING" ((org-agenda-overriding-header "WAITING:"))) @@ -95,19 +119,19 @@ '(("i" "Inbox" entry (file "inbox.org") "* %^{Brief Description}\nAdded: %U\n%?" - :empty-lines-before 1) + :empty-lines-after 1) ("n" "Next Item" entry (file "next.org") "* TODO %^{Brief Description} %^{tags}G\nAdded: %U\n%?" - :empty-lines-before 1) + :empty-lines-after 1) ("u" "Undertake" entry (file "undertakings.org") "* UNDERTAKEN %^{Brief Description}\nAdded: %U\n%?" - :empty-lines-before 1) + :empty-lines-after 1) ("m" "Meeting" entry (file "agenda.org") "* %^{Brief Description}\n%^{Scheduled:}T\n%?" - :empty-lines-before 1))) + :empty-lines-after 1))) (setq org-id-link-to-org-use-id 'create-if-interactive-and-no-custom-id org-id-method 'ts -- 2.39.5