New face for upcoming deadlines in agenda

* lisp/org-faces.el (org-upcoming-distant-deadline-face): New face.
This commit is contained in:
Alex Branham 2018-02-26 18:41:02 -06:00 committed by Nicolas Goaziou
parent 6a56ae53f2
commit f521400a08
2 changed files with 12 additions and 3 deletions

View File

@ -193,7 +193,6 @@ you should expect to see something like:
#+BEGIN_EXAMPLE
,#+STARTUP: shrink
#+END_EXAMPLE
** New functions
*** ~org-insert-structure-template~
@ -228,6 +227,11 @@ Org Tempo may be used as a replacement. See details above.
** Miscellaneous
*** New face: ~org-upcoming-distant-deadline~
It is meant to be used as the face for distant deadlines, see
~org-agenda-deadline-faces~
*** ~org-paste-subtree~ no longer breaks sections
Unless point is at the beginning of a headline, ~org-paste-subtree~

View File

@ -511,13 +511,18 @@ which days belong to the weekend."
(((class color) (min-colors 8) (background light)) (:foreground "red"))
(((class color) (min-colors 8) (background dark)) (:foreground "red" :bold t))
(t (:bold t)))
"Face for items scheduled previously, and not yet done."
"Face for items scheduled previously, and not yet done.
See also `org-agenda-deadline-faces'."
:group 'org-faces)
(defface org-upcoming-distant-deadline '((t :inherit org-default))
"Face for items scheduled previously, not done, and have a distant deadline.
See also `org-agenda-deadline-faces'.")
(defcustom org-agenda-deadline-faces
'((1.0 . org-warning)
(0.5 . org-upcoming-deadline)
(0.0 . default))
(0.0 . org-upcoming-distant-deadline))
"Faces for showing deadlines in the agenda.
This is a list of cons cells. The cdr of each cell is a face to be used,
and it can also just be like \\='(:foreground \"yellow\").