浏览代码

Fix commit f21fb8a

Bastien 7 年之前
父节点
当前提交
5d0792057d
共有 1 个文件被更改,包括 1 次插入4 次删除
  1. 1 4
      lisp/org-agenda.el

+ 1 - 4
lisp/org-agenda.el

@@ -6004,10 +6004,7 @@ specification like [h]h:mm."
 			 org-deadline-warning-days))
 		   ;; Set pre-warning to deadline.
 		   (t 0))))
-	       (wdays (if suppress-prewarning
-			  (let ((org-deadline-warning-days suppress-prewarning))
-			    (org-get-wdays s))
-			(org-get-wdays s))))
+	       (wdays (or suppress-prewarning (org-get-wdays s))))
 	  (cond
 	   ;; Only display deadlines at their base date, at future
 	   ;; repeat occurrences or in today agenda.