浏览代码

org-taskjuggler.el: Use project end date, if specified

* org-taskjuggler.el (org-taskjuggler-open-project): Use START - END as
an alternative to START +Xd.
Yann Hodique 12 年之前
父节点
当前提交
a35500b842
共有 1 个文件被更改,包括 4 次插入2 次删除
  1. 4 2
      lisp/org-taskjuggler.el

+ 4 - 2
lisp/org-taskjuggler.el

@@ -615,9 +615,11 @@ specified it is calculated
 	 (start (cdr (assoc "start" project)))
 	 (end (cdr (assoc "end" project))))
     (insert
-     (format "project %s \"%s\" \"%s\" %s +%sd {\n }\n"
+     (format "project %s \"%s\" \"%s\" %s %s {\n }\n"
 	     unique-id headline version start
-	     org-export-taskjuggler-default-project-duration))))
+             (or (and end (format "- %s" end))
+                 (format "+%sd"
+                         org-export-taskjuggler-default-project-duration))))))
 
 (defun org-taskjuggler-filter-and-join (items)
   "Filter all nil elements from ITEMS and join the remaining ones