[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH 08/10] org-taskjuggler: disambiguate "headline", as it's also
From: |
Yann Hodique |
Subject: |
[O] [PATCH 08/10] org-taskjuggler: disambiguate "headline", as it's also a valid taskjuggler property |
Date: |
Sun, 5 Aug 2012 12:54:02 +0200 |
---
lisp/org-taskjuggler.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/lisp/org-taskjuggler.el b/lisp/org-taskjuggler.el
index 996665d..b08dcdf 100644
--- a/lisp/org-taskjuggler.el
+++ b/lisp/org-taskjuggler.el
@@ -328,7 +328,7 @@ defined in `org-export-taskjuggler-default-reports'."
(unless resources
(setq resources
`((("resource_id" . ,(user-login-name))
- ("headline" . ,user-full-name)
+ ("HEADLINE" . ,user-full-name)
("level" . 1)))))
;; add a default allocation to the first task if none was given
(unless (assoc "allocate" (car tasks))
@@ -426,7 +426,7 @@ information, all the properties, etc."
(when deadline
(push (cons "end" (org-taskjuggler-date (cdr deadline))) props)))
(push (cons "level" level) props)
- (push (cons "headline" headline) props)
+ (push (cons "HEADLINE" headline) props)
(push (cons "parent-ordered" parent-ordered) props)))
(defun org-taskjuggler-assign-task-ids (tasks)
@@ -600,7 +600,7 @@ The id is derived from the headline and made unique against
UNIQUE-IDS. If the (downcased) first token of the headline is not
unique try to add more (downcased) tokens of the headline or
finally add more underscore characters (\"_\")."
- (let* ((headline (cdr (assoc "headline" item)))
+ (let* ((headline (cdr (assoc "HEADLINE" item)))
(parts (split-string headline))
(id (org-taskjuggler-clean-id (downcase (pop parts)))))
; try to add more parts of the headline to make it unique
@@ -626,7 +626,7 @@ attributes from the PROJECT alist are inserted. If no end
date is
specified it is calculated
`org-export-taskjuggler-default-project-duration' days from now."
(let* ((unique-id (cdr (assoc "unique-id" project)))
- (headline (cdr (assoc "headline" project)))
+ (headline (cdr (assoc "HEADLINE" project)))
(version (cdr (assoc "version" project)))
(start (cdr (assoc "start" project)))
(end (cdr (assoc "end" project))))
@@ -677,7 +677,7 @@ is defined it will calculate a unique id for the resource
using
(or (cdr (assoc "resource_id" resource))
(cdr (assoc "ID" resource))
(cdr (assoc "unique-id" resource)))))
- (headline (cdr (assoc "headline" resource)))
+ (headline (cdr (assoc "HEADLINE" resource)))
(attributes org-export-taskjuggler-valid-resource-attributes))
(insert
(concat
@@ -702,7 +702,7 @@ org-mode priority string."
(defun org-taskjuggler-open-task (task)
(let* ((unique-id (cdr (assoc "unique-id" task)))
- (headline (cdr (assoc "headline" task)))
+ (headline (cdr (assoc "HEADLINE" task)))
(effort (org-taskjuggler-clean-effort (cdr (assoc org-effort-property
task))))
(depends (cdr (assoc "depends" task)))
(allocate (cdr (assoc "allocate" task)))
--
1.7.11.3
- [O] [PATCH 03/10] org-taskjuggler: make use of org properties, (continued)
- [O] [PATCH 03/10] org-taskjuggler: make use of org properties, Yann Hodique, 2012/08/05
- [O] [PATCH 05/10] org-taskjuggler: introduce a global header, for early macros, Yann Hodique, 2012/08/05
- [O] [PATCH 06/10] org-taskjuggler: use project end date, if specified, Yann Hodique, 2012/08/05
- [O] [PATCH 07/10] org-taskjuggler: make project umbrella task optional, Yann Hodique, 2012/08/05
[O] [PATCH 08/10] org-taskjuggler: disambiguate "headline", as it's also a valid taskjuggler property,
Yann Hodique <=
[O] [PATCH 09/10] org-taskjuggler: allow reports definition from within the org file, Yann Hodique, 2012/08/05
[O] [PATCH 10/10] org-taskjuggler: update doc to reflect latest changes, Yann Hodique, 2012/08/05
Re: [O] [PATCH 00/10] Takjuggler exporter improvements, Bastien, 2012/08/05
Re: [O] [PATCH 00/10] Takjuggler exporter improvements, Christian Egli, 2012/08/10
[O] [PATCH v2 00/11] Takjuggler exporter improvements, Yann Hodique, 2012/08/15