On 2019-07-12, at 10:53, Nicolas Goaziou <m...@nicolasgoaziou.fr> wrote:

> Hello,
>
> Marcin Borkowski <mb...@mbork.pl> writes:
>
>> Thanks.  I meant that - according to the manual - `t' should be
>> synonymous with `near' and not `all'.  I can fix the commit message, but
>> could you confirm that I'm right first?
>
> AFAICT, your guess sounds right.

Thanks.  How about this?

Best,

-- 
Marcin Borkowski
http://mbork.pl
>From 669b4347f35dd87815e9f232ab72533d6514d7d1 Mon Sep 17 00:00:00 2001
From: Marcin Borkowski <mb...@mbork.pl>
Date: Mon, 24 Jun 2019 21:05:56 +0200
Subject: [PATCH] Fix a bug when `org-agenda-todo-ignore-deadlines` is set to t

Make `t' synonymous with `near' instead of `all' (as is stated in the
docstring).
---
 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 daf51601d..673c3c311 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -5444,7 +5444,7 @@ This function is invoked if `org-agenda-todo-ignore-deadlines',
 	  (and org-agenda-todo-ignore-deadlines
 	       (re-search-forward org-deadline-time-regexp end t)
 	       (cond
-		((memq org-agenda-todo-ignore-deadlines '(t all)) t)
+		((eq org-agenda-todo-ignore-deadlines 'all) t)
 		((eq org-agenda-todo-ignore-deadlines 'far)
 		 (not (org-deadline-close-p (match-string 1))))
 		((eq org-agenda-todo-ignore-deadlines 'future)
-- 
2.22.0

Reply via email to