From mboxrd@z Thu Jan 1 00:00:00 1970 From: Nicolas Goaziou Subject: Re: Taskjuggler export deals badly with first parent match Date: Fri, 19 Apr 2013 11:32:50 +0200 Message-ID: <87ehe6q30d.fsf@gmail.com> References: <87k3nyaoj4.fsf@bat.fr.eu.org> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([208.118.235.92]:42078) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UT7gd-0000M3-T5 for emacs-orgmode@gnu.org; Fri, 19 Apr 2013 05:32:56 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UT7gc-0003vo-IE for emacs-orgmode@gnu.org; Fri, 19 Apr 2013 05:32:55 -0400 Received: from mail-wi0-x232.google.com ([2a00:1450:400c:c05::232]:35569) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UT7gc-0003vh-CA for emacs-orgmode@gnu.org; Fri, 19 Apr 2013 05:32:54 -0400 Received: by mail-wi0-f178.google.com with SMTP id hq17so502212wib.17 for ; Fri, 19 Apr 2013 02:32:53 -0700 (PDT) In-Reply-To: <87k3nyaoj4.fsf@bat.fr.eu.org> (Baptiste's message of "Fri, 19 Apr 2013 10:54:41 +0200") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Baptiste Cc: Org-mode --=-=-= Content-Type: text/plain Hello, Baptiste writes: > I found ox-taskjuggler broken in /task_id/ identification when it is > non trivial. Oops. It looks like I made a typo. Thank you for reporting it. Would the following patch solve the problem? Regards, -- Nicolas Goaziou --=-=-= Content-Type: text/x-patch Content-Disposition: inline; filename=0001-ox-taskjuggler.el-Fix-dependecies-string.patch >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 --=-=-=--