jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Simplify org-today

Browse source
This commit is contained in:
Adam Porter 2018-05-10 15:56:53 -05:00
parent 1d9a2cfc53
commit 41b1e0e837
2 changed files with 23 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

28
README.org
View file

@ -6,9 +6,9 @@ Here's an example of generating a kind of agenda view for today (note that the g
#+BEGIN_SRC elisp
(org-agenda-ng "~/src/emacs/org-super-agenda/test/test.org"
(and (or (date '= (org-today))
(and (or (date '= today)
(deadline '<=)
(scheduled '<= (org-today)))
(scheduled '<= today))
(not (done))))
#+END_SRC
@ -28,27 +28,35 @@ Here are some other examples:
(org-agenda-ng "~/org/main.org"
(or (habit)
(deadline '<=)
(scheduled '<= (org-today))
(scheduled '<= today)
(and (todo "DONE" "CANCELLED")
(closed '= (org-today)))))
(closed '= today))))
(org-agenda-ng "~/org/main.org"
(or (habit)
(and (or (date '= (org-today))
(and (or (date '= today)
(deadline '<=)
(scheduled '<= (org-today)))
(scheduled '<= today))
(not (done)))
(and (todo "DONE" "CANCELLED")
(closed '= (org-today)))))
(closed '= today))))
(org-agenda-ng "~/org/main.org"
(or (habit)
(and (or (date '= (org-today))
(and (or (date '= today)
(deadline '<=)
(scheduled '<= (org-today)))
(scheduled '<= today))
(not (done)))
(and (todo "DONE" "CANCELLED")
(closed '= (org-today)))))
(closed '= today))))
(org-agenda-ng "~/org/main.org"
(or (habit)
(and (or (date '= today)
(deadline '<=)
(scheduled '<= today))
(not (done)))
(and (todo "DONE" "CANCELLED")
(closed '= today))))
#+END_SRC
** org-ql