diff options
author | Christian Cunningham <cc@localhost> | 2024-06-14 15:51:34 -0700 |
---|---|---|
committer | Christian Cunningham <cc@localhost> | 2024-06-14 15:51:34 -0700 |
commit | 702f6a9e6ef16638660905c71380e615f90d8e0e (patch) | |
tree | 95ef1b505aa8b2515c752473ea07912af1cebc1a /elchemy-dashboard.el | |
parent | db67aa854105ac1dcf42ff2f2b3d3f9fabb14854 (diff) |
New Todo and Sorting
Diffstat (limited to 'elchemy-dashboard.el')
-rw-r--r-- | elchemy-dashboard.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/elchemy-dashboard.el b/elchemy-dashboard.el index 32efb92..0768483 100644 --- a/elchemy-dashboard.el +++ b/elchemy-dashboard.el @@ -153,14 +153,14 @@ (add-text-properties start (point) '(face (:height 1.5)))) (insert "\n") - (insert (elchemy/format-processed-agenda (mapcar 'elchemy/process-agenda-heading (org-ql-select (org-agenda-files) `(and (todo "STRT" "WAIT" "TODO") (ts :from ,(- elchemy/schedule-lookahead) :to today)))))) + (insert (elchemy/format-processed-agenda (mapcar 'elchemy/process-agenda-heading (org-ql-select (org-agenda-files) `(and (todo "STRT" "WAIT" "TODO" "CYCL") (ts :from ,(- elchemy/schedule-lookahead) :to today)) :sort '(todo priority date))))) (insert "\n") (let ((start (point))) (insert "Upcoming") (add-text-properties start (point) '(face (:height 1.5)))) (insert "\n") - (insert (elchemy/format-processed-agenda (mapcar 'elchemy/process-agenda-heading (org-ql-select (org-agenda-files) `(and (todo "STRT" "WAIT" "TODO") (ts :from today :to ,elchemy/schedule-lookahead)))))) + (insert (elchemy/format-processed-agenda (mapcar 'elchemy/process-agenda-heading (org-ql-select (org-agenda-files) `(and (todo "STRT" "WAIT" "TODO" "CYCL") (ts :from today :to ,elchemy/schedule-lookahead)) :sort '(todo priority date))))) (insert "\n") (let ((start (point))) (insert "Command Reference") |