0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-07-17 06:06:26 +00:00

Do not prefer future when jumping to a date in the agenda

* lisp/org-agenda.el (org-agenda-goto-date): Turn off prefer future
for this command.
This commit is contained in:
Carsten Dominik 2010-09-21 12:56:02 +02:00
parent 7fc897de70
commit 03b178d120

View file

@ -5809,7 +5809,8 @@ Negative selection means regexp must not match for selection of an entry."
(defun org-agenda-goto-date (date)
"Jump to DATE in agenda."
(interactive (list (org-read-date)))
(interactive (list (let ((org-read-date-prefer-future nil))
(org-read-date))))
(org-agenda-list nil date))
(defun org-agenda-goto-today ()