From 0b0b9ab98657145cddb20fc6ffd45414a7f23d83 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Fri, 19 Apr 2013 11:30:49 +0200 Subject: [PATCH] ox-taskjuggler.el: Fix dependecies string * contrib/lisp/ox-taskjuggler.el (org-taskjuggler-format-dependencies): Fix dependecies string. --- contrib/lisp/ox-taskjuggler.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/contrib/lisp/ox-taskjuggler.el b/contrib/lisp/ox-taskjuggler.el index 16f0e8d..76e0182 100644 --- a/contrib/lisp/ox-taskjuggler.el +++ b/contrib/lisp/ox-taskjuggler.el @@ -544,7 +544,7 @@ doesn't include leading \"depends\"." (get-path (lambda (dep) ;; Return path to DEP relatively to TASK. - (let ((parent (org-export-get-parent dep)) + (let ((parent (org-export-get-parent task)) (exclamations 1) (option (let ((id (org-element-property :TASK_ID dep))) @@ -555,7 +555,7 @@ doesn't include leading \"depends\"." ;; Compute number of exclamation marks by looking for the ;; common ancestor between TASK and DEP. (while (not (org-element-map parent 'headline - (lambda (hl) (eq hl task)))) + (lambda (hl) (eq hl dep)))) (incf exclamations) (setq parent (org-export-get-parent parent))) ;; Build path from DEP to PARENT. -- 1.8.2.1