org-todo-yesterday: Fix interactive arg when in agenda buffer

* lisp/org.el (org-todo-yesterday): Fix an incorrect use of apply when
`org-todo-yesterday' intends to call `org-agenda-todo-yesterday' with
the same interactive arg.  Before this change, the command incorrectly
set the todo state of the task to blank when called with C-u C-u C-u
in an agenda buffer (supposed to bypass any blocked
checkboxes/subtasks).

TINYCHANGE
This commit is contained in:
Aaron L. Zeng 2022-05-22 14:51:21 -04:00 committed by Ihor Radchenko
parent 8e69adabe2
commit 713c15d852
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B

View file

@ -8817,7 +8817,7 @@ nil or a string to be used for the todo mark." )
"Like `org-todo' but the time of change will be 23:59 of yesterday."
(interactive "P")
(if (eq major-mode 'org-agenda-mode)
(apply 'org-agenda-todo-yesterday arg)
(org-agenda-todo-yesterday arg)
(let* ((org-use-effective-time t)
(hour (nth 2 (decode-time (org-current-time))))
(org-extend-today-until (1+ hour)))