[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH 02/10] org-taskjuggler: properly install local variables at e
From: |
Yann Hodique |
Subject: |
[O] [PATCH 02/10] org-taskjuggler: properly install local variables at export time |
Date: |
Sun, 5 Aug 2012 12:53:56 +0200 |
* org-taskjuggler.el (org-export-as-taskjuggler): compute opt-plist, use
`org-install-letbind'
---
lisp/org-taskjuggler.el | 13 ++++++++++++-
1 file changed, 12 insertions(+), 1 deletion(-)
diff --git a/lisp/org-taskjuggler.el b/lisp/org-taskjuggler.el
index 3c56630..102eabc 100644
--- a/lisp/org-taskjuggler.el
+++ b/lisp/org-taskjuggler.el
@@ -284,7 +284,10 @@ defined in `org-export-taskjuggler-default-reports'."
(message "Exporting...")
(setq-default org-done-keywords org-done-keywords)
- (let* ((tasks
+ (let* ((opt-plist (org-combine-plists (org-default-export-plist)
+ (org-infile-export-plist)))
+ (org-export-opt-plist opt-plist)
+ (tasks
(org-taskjuggler-resolve-dependencies
(org-taskjuggler-assign-task-ids
(org-taskjuggler-compute-task-leafiness
@@ -335,6 +338,14 @@ defined in `org-export-taskjuggler-default-reports'."
(insert org-export-taskjuggler-default-global-properties)
(insert "\n")
(dolist (resource resources)
+ (org-install-letbind)
+ ;; create local variables for all options, to make sure all called
+ ;; functions get the correct information
+ (mapc (lambda (x)
+ (set (make-local-variable (nth 2 x))
+ (plist-get opt-plist (car x))))
+ org-export-plist-vars)
+
(let ((level (cdr (assoc "level" resource))))
(org-taskjuggler-close-maybe level)
(org-taskjuggler-open-resource resource)
--
1.7.11.3
- [O] [PATCH 00/10] Takjuggler exporter improvements, Yann Hodique, 2012/08/05
- [O] [PATCH 01/10] org-taskjuggler: make task and resource properties customizable, Yann Hodique, 2012/08/05
- [O] [PATCH 04/10] org-taskjuggler: task with end-only is also a milestone (deadline), Yann Hodique, 2012/08/05
- [O] [PATCH 02/10] org-taskjuggler: properly install local variables at export time,
Yann Hodique <=
- [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