diff options
| author | Sébastien Delafond <sdelafond@gmail.com> | 2014-07-13 13:35:31 +0200 |
|---|---|---|
| committer | Sébastien Delafond <sdelafond@gmail.com> | 2014-07-13 13:35:31 +0200 |
| commit | 52fbfeb04b10aa78f24f339a352fe1161c0b37e4 (patch) | |
| tree | a3b147a3a2e4bb39c4ae36c0f442c6137ae506e2 /contrib/lisp/ox-taskjuggler.el | |
| parent | 40ce6b75e6245659a3a14622356e32e7dd1125dd (diff) | |
Imported Upstream version 8.2.4
Diffstat (limited to 'contrib/lisp/ox-taskjuggler.el')
| -rw-r--r-- | contrib/lisp/ox-taskjuggler.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/contrib/lisp/ox-taskjuggler.el b/contrib/lisp/ox-taskjuggler.el index 13f2f5e..fe88b45 100644 --- a/contrib/lisp/ox-taskjuggler.el +++ b/contrib/lisp/ox-taskjuggler.el @@ -800,7 +800,9 @@ a unique id will be associated to it." (if (eq (org-element-property :todo-type task) 'done) "100" (org-element-property :COMPLETE task))) (depends (org-taskjuggler-resolve-dependencies task info)) - (effort (org-element-property :EFFORT task)) + (effort (let ((property + (intern (concat ":" (upcase org-effort-property))))) + (org-element-property property task))) (milestone (or (org-element-property :MILESTONE task) (not (or (org-element-map (org-element-contents task) 'headline |