0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-25 01:02:52 +00:00

org-agenda.el: bugfix, remove useless `org-agenda-current-span'.

* org-agenda.el (org-agenda-list): Fix bug: don't rely on
`org-agenda-current-span' when calling `org-agenda-list'.
This commit is contained in:
Bastien Guerry 2011-03-06 16:37:55 +01:00
parent 35effd6b6d
commit 82224d6b34

View file

@ -3492,10 +3492,8 @@ given in `org-agenda-start-on-weekday'."
(setq org-agenda-last-arguments (list include-all start-day span))
(org-compile-prefix-format 'agenda)
(org-set-sorting-strategy 'agenda)
(let* ((span (org-agenda-ndays-to-span (or span
org-agenda-current-span
org-agenda-ndays
org-agenda-span)))
(let* ((span (org-agenda-ndays-to-span
(or span org-agenda-ndays org-agenda-span)))
(today (org-today))
(sd (or start-day today))
(ndays (org-agenda-span-to-ndays span sd))