From 42c752bffac1c3bfbf3e5dfec7e946cf0bcde7e9 Mon Sep 17 00:00:00 2001 From: rearman Date: Mon, 15 Jun 2026 14:03:46 -0400 Subject: [PATCH] gtd distillation simpler and simpler, don't need the complexity --- config.org | 18 ++++++------------ 1 file changed, 6 insertions(+), 12 deletions(-) diff --git a/config.org b/config.org index bef12c0..22f8d37 100644 --- a/config.org +++ b/config.org @@ -302,7 +302,8 @@ Sly really doesn't play well with elodc in the minibuffer, so here are some sett #+BEGIN_SRC emacs-lisp (defvar *re/org-agenda-inbox* '(tags "CATEGORY=\"inbox\"" ((org-agenda-skip-function - '(org-agenda-skip-entry-if 'regexp "^\\* "))))) + '(org-agenda-skip-entry-if 'regexp "^\\* ")) + (org-agenda-overriding-header "INBOX:")))) (defvar *re/org-agenda-todo* '(tags-todo "-recurring/TODO" ((org-agenda-overriding-header "NEXT:")))) @@ -312,22 +313,15 @@ Sly really doesn't play well with elodc in the minibuffer, so here are some sett '(org-agenda-skip-entry-if 'notregexp "^\\*\\* "))))) (defvar *re/org-agenda-waiting* - '(todo "WAITING" ((org-agenda-skip-function - '(org-agenda-skip-entry-if 'regexp "^\\*\\* ")) - (org-agenda-overriding-header "WAITIŊ:")))) - -(defvar *re/org-agenda-two-week-overview* - '(agenda "" ((org-agenda-span 14) - (org-agenda-start-day "+1d") - (org-agenda-start-on-weekday nil) - (org-agenda-overriding-header "TWO-WEEK UPCOMIŊ:")))) + '(todo "WAITING" ((org-agenda-overriding-header "WAITIŊ:")))) (setq org-agenda-custom-commands `(("i" "Inbox" ,@*re/org-agenda-inbox*) ("n" "Next Actions" ,@*re/org-agenda-todo*) ("u" "Undertakings" ,@*re/org-agenda-undertakings*) ("w" "Waiting" ,@*re/org-agenda-waiting*) - ("o" "Overview" ((agenda) - (tags-todo "-recurring/-MEETING"))))) + ("o" "Overview" (,*re/org-agenda-inbox* + ,,*re/org-agenda-todo* + ,,*re/org-agenda-waiting*)))) #+END_SRC ***** Capture Templates #+BEGIN_SRC emacs-lisp -- 2.39.5