Don't add deadlines if the user has configured to exclude them locally

Patch by Matt Lundin
2010-03-24 12:00:57 +01:00 · 2010-03-24 12:00:57 +01:00 · 3598ed89d9
parent c0707b1f31
commit 3598ed89d9
1 changed files with 1 additions and 2 deletions
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@ -3281,8 +3281,7 @@ given in `org-agenda-start-on-weekday'."
 	(catch 'nextfile
 	  (org-check-agenda-file file)
 	  (let ((org-agenda-entry-types org-agenda-entry-types))
-	    (if org-agenda-include-deadlines
-		(add-to-list 'org-agenda-entry-types :deadline)
+	    (unless org-agenda-include-deadlines
 	      (setq org-agenda-entry-types
 		    (delq :deadline org-agenda-entry-types)))
 	    (cond