diff options
author | Sebastien Delafond <seb@debian.org> | 2013-10-27 17:14:14 +0100 |
---|---|---|
committer | Sébastien Delafond <sdelafond@gmail.com> | 2014-07-13 13:35:29 +0200 |
commit | d3ee0b02baea9e4e066ed16145ba076165d8a696 (patch) | |
tree | fdb3661e3284a5d42637a562216e29ac4edd40d4 /lisp/org-habit.el | |
parent | 44bbf7eace0d917b5deb7a2ee74ef2927e095b3c (diff) | |
parent | 40ce6b75e6245659a3a14622356e32e7dd1125dd (diff) |
Imported Debian patch 8.2.1-1
Diffstat (limited to 'lisp/org-habit.el')
-rw-r--r-- | lisp/org-habit.el | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/lisp/org-habit.el b/lisp/org-habit.el index 8465ba4..eba9037 100644 --- a/lisp/org-habit.el +++ b/lisp/org-habit.el @@ -85,6 +85,12 @@ today's agenda, even if they are not scheduled." :version "24.1" :type 'character) +(defcustom org-habit-show-done-always-green nil + "Non-nil means DONE days will always be green in the consistency graph. +It will be green even if it was done after the deadline." + :group 'org-habit + :type 'boolean) + (defface org-habit-clear-face '((((background light)) (:background "#8270f9")) (((background dark)) (:background "blue"))) @@ -272,8 +278,9 @@ Habits are assigned colors on the following basis: (if donep '(org-habit-ready-face . org-habit-ready-future-face) '(org-habit-alert-face . org-habit-alert-future-face))) - (t - '(org-habit-overdue-face . org-habit-overdue-future-face))))) + ((and org-habit-show-done-always-green donep) + '(org-habit-ready-face . org-habit-ready-future-face)) + (t '(org-habit-overdue-face . org-habit-overdue-future-face))))) (defun org-habit-build-graph (habit starting current ending) "Build a graph for the given HABIT, from STARTING to ENDING. |