more tweaks for capturing and filtering

diff --git a/re/re-org.el b/re/re-org.el
index a78232ff292b40bfd628c7492680efbaac42eaad..66885eeb85bfde96917c82df62c8ccb008c01f60 100644 (file)
--- 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