Add todo sequence for mtls

diff --git a/init.el b/init.el
index 8e30b0b7313c1d4756eec4fcfaee6060333fc594..d8adc8d4781cae2ede28958d26dad248932d7c8b 100644 (file)
--- a/init.el
+++ b/init.el
@@ -223,8 +223,10 @@
                               (file-expand-wildcards "~/projects/*/"))\r
       org-refile-targets '((nil :maxlevel . 9)\r
                           (org-agenda-files :maxlevel . 9))\r
-      org-todo-keywords '((sequence "TODO(t)" "WAITING(w@)" "|" "DONE(d)" "BELAYED(b@)" "GIVEN(g@)"))\r
-      org-todo-keyword-faces '(("WAITING" :foreground "#e85400" :weight bold)) ; alert orange\r
+      org-todo-keywords '((sequence "TODO(t)" "WAITING(w@)" "|" "DONE(d)" "BELAYED(b@)" "GIVEN(g@)")\r
+                         (sequence "TODO(t)" "ENTERED(e!)" "|" "RECEIVED(r)"))\r
+      org-todo-keyword-faces '(("WAITING" :foreground "#e85400" :weight bold)\r
+                              ("ENTERED" :foreground "#e85400" :weight bold)) ; alert orange\r
       org-agenda-prefix-format '((agenda . "          %?-12t%? s")\r
                                 (todo . " ")\r
                                 (tags . " ")\r
@@ -239,7 +241,7 @@
 \r
 ;; Stuck Projects\r
 \r
-(setq org-stuck-projects '("CATEGORY=\"undertakings\"+LEVEL=1/-DONE-GIVEN-BELAYED" ("TODO" "WAITING") nil ""))\r
+(setq org-stuck-projects '("CATEGORY=\"undertakings\"+LEVEL=1/-DONE-GIVEN-BELAYED-RECEIVED" ("TODO" "WAITING" "ENTERED") nil ""))\r
 \r
 ;; Custom Agendas\r
 \r
@@ -253,10 +255,10 @@
   '(tags "CATEGORY=\"undertakings\"+LEVEL=1" ((org-agenda-overriding-header ""))))\r
 \r
 (defvar *re/org-agenda-waiting*\r
-  '(todo "WAITING" ((org-agenda-overriding-header ""))))\r
+  '(todo "WAITING|ENTERED" ((org-agenda-overriding-header ""))))\r
 \r
 (defvar *re/org-agenda-done*\r
-  '(tags "-recurring+LEVEL=1/DONE|BELAYED|GIVEN"))\r
+  '(tags "-recurring+LEVEL=1/DONE|BELAYED|GIVEN|RECEIVED"))\r
 \r
 (setq org-agenda-custom-commands `(("i" "Inbox" ,@*re/org-agenda-inbox*)\r
                                   ("n" "Next Actions" ,@*re/org-agenda-todo*)\r