From f283cf96533a2570253baeb14711db240b156740 Mon Sep 17 00:00:00 2001 From: rush Date: Mon, 29 Jun 2026 14:12:42 -0400 Subject: [PATCH] Add definition for stuck projects, simpler undertaking agenda Stuck == undertaking, not done, no todo/waiting items under it. Update undertakings custom agenda to use the new format/tag filtering of the stuck project. --- config.org | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/config.org b/config.org index 3d303ad..aa6deb8 100644 --- a/config.org +++ b/config.org @@ -279,6 +279,10 @@ Sly really doesn't play well with elodc in the minibuffer, so here are some sett org-agenda-start-with-log-mode t org-agenda-log-mode-items '(closed clock state)) #+END_SRC +**** Stuck Projects +#+BEGIN_SRC emacs-lisp +(setq org-stuck-projects '("CATEGORY=\"undertakings\"+LEVEL=1/-DONE-GIVEN-BELAYED" ("TODO" "WAITING") nil "")) +#+END_SRC **** Custom Agendas #+BEGIN_SRC emacs-lisp (defvar *re/org-agenda-inbox* @@ -288,9 +292,7 @@ Sly really doesn't play well with elodc in the minibuffer, so here are some sett '(tags-todo "-recurring/TODO" ((org-agenda-overriding-header "")))) (defvar *re/org-agenda-undertakings* - '(tags "CATEGORY=\"undertakings\"" ((org-agenda-skip-function - '(org-agenda-skip-entry-if 'notregexp "^\\* ")) - (org-agenda-overriding-header "")))) + '(tags "CATEGORY=\"undertakings\"+LEVEL=1" ((org-agenda-overriding-header "")))) (defvar *re/org-agenda-waiting* '(todo "WAITING" ((org-agenda-overriding-header "")))) -- 2.39.5