Skip to content

Instantly share code, notes, and snippets.

@al3xandru
Created February 18, 2024 11:08
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save al3xandru/52be66ef7841772b369e41d3287d3ee3 to your computer and use it in GitHub Desktop.
Save al3xandru/52be66ef7841772b369e41d3287d3ee3 to your computer and use it in GitHub Desktop.
Emacs Lisp Org
(use-package org-ql
:after (org)
:config
(add-to-list 'org-agenda-custom-commands
'(
("t" "Today"
(
(agenda "Today"
((org-agenda-skip-function '(org-agenda-skip-entry-if 'done 'canceled))
(org-agenda-span 'day)))
(org-ql-block '(todo "TODO" "WIP")
((org-ql-block-header "For today:")))
))))
)
;; when using add-to-list 'org-agenda-custom-commands, invoking it resaults in
;; Wrong type argument stringp, (followed by the above definiton)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment