浏览代码

org-taskjuggler.el: Fix milestone definition

* org-taskjuggler.el (org-taskjuggler-open-task): Task with end-only is
also a milestone (deadline), task with length is not.
Yann Hodique 12 年之前
父节点
当前提交
bc78b9941c
共有 1 个文件被更改,包括 3 次插入1 次删除
  1. 3 1
      lisp/org-taskjuggler.el

+ 3 - 1
lisp/org-taskjuggler.el

@@ -689,8 +689,10 @@ org-mode priority string."
 	 (milestone (or (cdr (assoc "milestone" task))
 			(and (assoc "leaf-node" task)
 			     (not (or effort
+				      (cdr (assoc "length" task))
 				      (cdr (assoc "duration" task))
-				      (cdr (assoc "end" task))
+				      (and (cdr (assoc "start" task))
+					   (cdr (assoc "end" task)))
 				      (cdr (assoc "period" task)))))))
 	 (attributes org-export-taskjuggler-valid-task-attributes))
     (insert