mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-26 04:32:52 +00:00
Merge branch 'maint'
This commit is contained in:
commit
dfe33f9b6e
|
@ -6986,7 +6986,15 @@ Negative selection means regexp must not match for selection of an entry."
|
|||
(interactive (list (let ((org-read-date-prefer-future
|
||||
(eval org-agenda-jump-prefer-future)))
|
||||
(org-read-date))))
|
||||
(org-agenda-list nil date))
|
||||
(let ((org-agenda-sticky-orig org-agenda-sticky)
|
||||
org-agenda-sticky)
|
||||
(org-agenda-list nil date)
|
||||
(setq org-agenda-sticky org-agenda-sticky-orig
|
||||
org-agenda-this-buffer-is-sticky org-agenda-sticky))
|
||||
(let ((inhibit-read-only t))
|
||||
(add-text-properties (point-min) (point-max)
|
||||
`(org-last-cmd
|
||||
(org-agenda-list nil ,date)))))
|
||||
|
||||
(defun org-agenda-goto-today ()
|
||||
"Go to today."
|
||||
|
|
Loading…
Reference in a new issue