summaryrefslogtreecommitdiff
path: root/elchemy-dashboard.el
diff options
context:
space:
mode:
authorChristian Cunningham <cc@localhost>2024-06-14 15:51:34 -0700
committerChristian Cunningham <cc@localhost>2024-06-14 15:51:34 -0700
commit702f6a9e6ef16638660905c71380e615f90d8e0e (patch)
tree95ef1b505aa8b2515c752473ea07912af1cebc1a /elchemy-dashboard.el
parentdb67aa854105ac1dcf42ff2f2b3d3f9fabb14854 (diff)
New Todo and Sorting
Diffstat (limited to 'elchemy-dashboard.el')
-rw-r--r--elchemy-dashboard.el4
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")