diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-11-27 23:43:00 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-11-27 23:43:00 +0100 |
commit | abbf497b8433d00e0513809b77038d090207f71d (patch) | |
tree | 968f165fdf51bee6a29a144663a73549ea52f344 | |
parent | 4b99ed5eb095a52d65eb289831b857733d5925f7 (diff) | |
download | org-mode-abbf497b8433d00e0513809b77038d090207f71d.tar.gz |
org-agenda: Fix done scheduled display
* lisp/org-agenda.el (org-agenda-get-scheduled): Skip done scheduled
unconditionally whenever the base date is not the one currently
considered.
-rw-r--r-- | lisp/org-agenda.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 905918c..2144c91 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -6273,7 +6273,9 @@ scheduled items with an hour specification like [h]h:mm." (/= repeat current))) (throw :skip nil))) ;; Possibly skip done tasks. - (when (and donep org-agenda-skip-scheduled-if-done) + (when (and donep + (or org-agenda-skip-scheduled-if-done + (/= schedule current))) (throw :skip nil)) ;; Skip entry if it already appears as a deadline, per ;; `org-agenda-skip-scheduled-if-deadline-is-shown'. This |