From adb6e545c7ebd4914f1c36507c8ceeebc44d6997 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Fri, 3 Jan 2014 16:01:30 +0100 Subject: [PATCH] org-agenda.el (org-cmp-ts): Fix bug * org-agenda.el (org-cmp-ts): Fix bug: interpret `late' as `later than any date' instead of `later than today'. Thank to Michael Crouch for reporting this and to Michael Hoffman for providing the fix. --- lisp/org-agenda.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 1765968b5..74ba0eb8d 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7003,7 +7003,7 @@ When TYPE is \"scheduled\", \"deadline\", \"timestamp\" or \"timestamp_ia\", compare within each of these type. When TYPE is the empty string, compare all timestamps without respect of their type." - (let* ((def (if org-sort-agenda-notime-is-late 9901 -1)) + (let* ((def (if org-sort-agenda-notime-is-late most-positive-fixnum -1)) (ta (or (and (string-match type (or (get-text-property 1 'type a) "")) (get-text-property 1 'ts-date a)) def)) (tb (or (and (string-match type (or (get-text-property 1 'type b) "")) -- 2.11.4.GIT