From: rearman <rearman@r717.net>
Date: Thu, 12 Mar 2026 13:09:29 +0000 (-0400)
Subject: Add agenda view for job pcs (any todo state)
X-Git-Url: https://git.earman.xyz/?a=commitdiff_plain;h=9da7b8113dd8a019272f059321e03a178095b774;p=emacsinit.git

Add agenda view for job pcs (any todo state)

for review purposes, keep them around for a while until I want to archive
them.
---

diff --git a/re/re-org.el b/re/re-org.el
index 054be1d..260ddfc 100644
--- a/re/re-org.el
+++ b/re/re-org.el
@@ -82,8 +82,12 @@
       org-agenda-deadline-leaders '("DEADLINE: " "In %3d d.: " "%2d d. ago: "))
 
 (setq org-agenda-custom-commands
-      '(("i" "Inbox" tags "inbox" ((org-agenda-overriding-header "INBOX:")))
+      '(("d" "Done items" todo "DONE" ((org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp "^\\* "))
+				       (org-agenda-overriding-header "DONE - MAYBE ARCHIVE")))
+	("i" "Inbox" tags "inbox" ((org-agenda-overriding-header "INBOX:")))
 	("l" "Licenses" tags "license" ((org-agenda-overriding-header "LICENSES:")))
+	("m" "Maybe Someday" tags "someday" ((org-agenda-files '("~/org/someday.org"))
+					     (org-agenda-overriding-header "SOMEDAY:")))
 	("n" "Next Actions" ((tags-todo "email-recurring/TODO"
 					((org-agenda-overriding-header "EMAILS:")))
 			     (tags-todo "call-recurring/TODO"
@@ -104,12 +108,9 @@
 					((org-agenda-overriding-header "WRITS:")))
 			     (tags-todo "ALLTAGS=\"\"/TODO"
 					((org-agenda-overriding-header "UNCATEGORIZED:")))))
+	("p" "JobPCs" tags "jobpc" ((org-agenda-overriding-header "JOB PCS:")))
 	("u" "Undertakings" todo "UNDERTAKEN" ((org-agenda-overriding-header "UNDERTAKINGS:")))
-	("w" "Waiting" todo "WAITING" ((org-agenda-overriding-header "WAITING:")))
-	("m" "Maybe Someday" tags "someday" ((org-agenda-files '("~/org/someday.org"))
-					     (org-agenda-overriding-header "SOMEDAY:")))
-	("d" "Done items" todo "DONE" ((org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp "^\\* "))
-				       (org-agenda-overriding-header "DONE - MAYBE ARCHIVE")))))
+	("w" "Waiting" todo "WAITING" ((org-agenda-overriding-header "WAITING:")))))
 
 ;; Configure stuck projects
 (setq org-stuck-projects '("+TODO=\"UNDERTAKEN\"" ("TODO") nil ""))