From mboxrd@z Thu Jan 1 00:00:00 1970 From: Alex Branham Subject: Re: face for upcoming deadlines in agenda Date: Mon, 26 Feb 2018 18:41:02 -0600 Message-ID: <87woyzuuw1.fsf@gmail.com> References: <878tbf8xg9.fsf@gmail.com> <87606jz9b2.fsf@nicolasgoaziou.fr> <87y3jfv09o.fsf@gmail.com> <87lgffxohr.fsf@nicolasgoaziou.fr> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:56517) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1eqTKR-0001pm-5j for emacs-orgmode@gnu.org; Mon, 26 Feb 2018 19:41:12 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1eqTKN-0005Yw-3I for emacs-orgmode@gnu.org; Mon, 26 Feb 2018 19:41:11 -0500 Received: from mail-ot0-x231.google.com ([2607:f8b0:4003:c0f::231]:37230) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1eqTKM-0005Ym-Q1 for emacs-orgmode@gnu.org; Mon, 26 Feb 2018 19:41:07 -0500 Received: by mail-ot0-x231.google.com with SMTP id t2so2258284otj.4 for ; Mon, 26 Feb 2018 16:41:06 -0800 (PST) In-reply-to: <87lgffxohr.fsf@nicolasgoaziou.fr> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: Nicolas Goaziou Cc: emacs-orgmode@gnu.org --=-=-= Content-Type: text/plain On Mon 26 Feb 2018 at 18:30, Nicolas Goaziou wrote: > Hello, > > Alex Branham writes: > >> I've attached a patch which gives a name to the 0.0 face in >> org-agenda-deadline-faces. This lets themes customize the value more >> easily. (I've already signed the FSF copyright papers) > > Thank you. Could you also provide a short ORG-NEW entry about it? Done, thanks ------------------------------------------------------------ >From 66a394b3736306e4039b29393915b4ca1821a86b Mon Sep 17 00:00:00 2001 From: Alex Branham Date: Mon, 26 Feb 2018 18:39:50 -0600 Subject: [PATCH] * lisp/org-faces.el(org-upcoming-distant-deadline-face): new face --- etc/ORG-NEWS | 2 +- lisp/org-faces.el | 9 +++++++-- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS index aff372582..a40dd1b9a 100644 --- a/etc/ORG-NEWS +++ b/etc/ORG-NEWS @@ -188,7 +188,7 @@ you should expect to see something like: #+BEGIN_EXAMPLE ,#+STARTUP: shrink #+END_EXAMPLE - +*** New face ~org-upcoming-distant-deadline~ which is meant to be used as the face for distant deadlines, see ~org-agenda-deadline-faces~ ** New functions *** ~org-insert-structure-template~ diff --git a/lisp/org-faces.el b/lisp/org-faces.el index 750ada1e9..ef00f5b2c 100644 --- a/lisp/org-faces.el +++ b/lisp/org-faces.el @@ -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\"). -- 2.16.2 --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-lisp-org-faces.el-org-upcoming-distant-deadline-face.patch >From 66a394b3736306e4039b29393915b4ca1821a86b Mon Sep 17 00:00:00 2001 From: Alex Branham Date: Mon, 26 Feb 2018 18:39:50 -0600 Subject: [PATCH] * lisp/org-faces.el(org-upcoming-distant-deadline-face): new face --- etc/ORG-NEWS | 2 +- lisp/org-faces.el | 9 +++++++-- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS index aff372582..a40dd1b9a 100644 --- a/etc/ORG-NEWS +++ b/etc/ORG-NEWS @@ -188,7 +188,7 @@ you should expect to see something like: #+BEGIN_EXAMPLE ,#+STARTUP: shrink #+END_EXAMPLE - +*** New face ~org-upcoming-distant-deadline~ which is meant to be used as the face for distant deadlines, see ~org-agenda-deadline-faces~ ** New functions *** ~org-insert-structure-template~ diff --git a/lisp/org-faces.el b/lisp/org-faces.el index 750ada1e9..ef00f5b2c 100644 --- a/lisp/org-faces.el +++ b/lisp/org-faces.el @@ -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\"). -- 2.16.2 --=-=-=--