Finish org-todo-at-date
This commit is contained in:
parent
2f028fb911
commit
250de4e55e
3
init.el
3
init.el
@ -657,7 +657,8 @@ The current directory is assumed to be the project's root otherwise."
|
|||||||
|
|
||||||
(defun org-todo-at-date (date)
|
(defun org-todo-at-date (date)
|
||||||
(interactive (list (org-time-string-to-time (org-read-date))))
|
(interactive (list (org-time-string-to-time (org-read-date))))
|
||||||
(flet ((org-current-effective-time (&rest r) date))
|
(flet ((org-current-effective-time (&rest r) date)
|
||||||
|
(org-today (&rest r) (time-to-days date)))
|
||||||
(org-todo)))
|
(org-todo)))
|
||||||
|
|
||||||
(add-to-list 'org-capture-templates (org-projectile:project-todo-entry "p"))
|
(add-to-list 'org-capture-templates (org-projectile:project-todo-entry "p"))
|
||||||
|
Loading…
Reference in New Issue
Block a user