]> git.earman.xyz Git - emacsinit.git/commitdiff
gtd distillation
authorrearman <rearman@r717.net>
Mon, 15 Jun 2026 18:03:46 +0000 (14:03 -0400)
committerrearman <rearman@r717.net>
Mon, 15 Jun 2026 18:03:46 +0000 (14:03 -0400)
simpler and simpler, don't need the complexity

config.org

index bef12c04fd43642b4107a20b060ff38b5e57ebf1..22f8d37f9d02704cfb405913cebd9835dde43d6f 100644 (file)
@@ -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