From f83ebc58a7a2d2797a74b9fc1108013319f44ccc Mon Sep 17 00:00:00 2001 From: Markus Hauck Date: Tue, 11 Mar 2014 16:06:17 +0100 Subject: [PATCH] Fix: `org-agenda-skip-scheduled-if-deadline-is-shown': show TODOs without deadline * lisp/org-agenda.el (org-agenda-get-scheduled): If `org-agenda-skip-scheduled-if-deadline-is-shown' is set to 'repeated-after-deadline, still show tasks without any deadline The problem was that the check for the deadline seems to return a default time even if no deadline is set for the task. This adds a check if there is a deadline at all, if there is none, the task is shown in the agenda, otherwise the old semantics apply. TINYCHANGE --- lisp/org-agenda.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index f9318e1..3ad82aa 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -6250,6 +6250,7 @@ an hour specification like [h]h:mm." category-pos (get-text-property (point) 'org-category-position)) (if (and (eq org-agenda-skip-scheduled-if-deadline-is-shown 'repeated-after-deadline) + (org-get-deadline-time (point)) (<= 0 (- d2 (time-to-days (org-get-deadline-time (point)))))) (throw :skip nil)) (if (not (re-search-backward "^\\*+[ \t]+" nil t)) -- 1.8.3