From ca3d385f7c4c3d90f6d661eb467477b1dbd07480 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Wed, 24 Dec 2014 04:18:13 -0500 Subject: [PATCH] Make org-todo-at-date work in agenda. --- dotfiles/emacs.d/init.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/dotfiles/emacs.d/init.el b/dotfiles/emacs.d/init.el index 42749924..292c59c6 100644 --- a/dotfiles/emacs.d/init.el +++ b/dotfiles/emacs.d/init.el @@ -686,7 +686,8 @@ The current directory is assumed to be the project's root otherwise." (interactive (list (org-time-string-to-time (org-read-date)))) (flet ((org-current-effective-time (&rest r) date) (org-today (&rest r) (time-to-days date))) - (org-todo))) + (cond ((eq major-mode 'org-mode) (org-todo)) + ((eq major-mode 'org-agenda-mode) (org-agenda-todo))))) (add-to-list 'org-capture-templates (org-projectile:project-todo-entry "p")) (add-to-list 'org-capture-templates (org-projectile:project-todo-entry "l" "* TODO %? %a\n"))