From e72485336fdcaf568c4afc3ca76913f9ecb9495f Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Fri, 2 Dec 2016 23:24:38 +0100 Subject: [PATCH] org-agenda: Fix face for past scheduled time stamps * lisp/org-agenda.el (org-agenda-get-scheduled): Fix face. --- 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 3e995042d..da748af5a 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -6365,7 +6365,7 @@ scheduled items with an hour specification like [h]h:mm." ;; schedule. (t (format next (1+ diff))))) head level category tags time nil habitp)) - (face (cond ((and (not habitp) (< current today)) + (face (cond ((and (not habitp) pastschedp) 'org-scheduled-previously) (todayp 'org-scheduled-today) (t 'org-scheduled)))