From mboxrd@z Thu Jan 1 00:00:00 1970 From: Christophe Schockaert Subject: Detect parent with SCHEDULED or DEADLINE Date: Thu, 14 Apr 2016 00:06:15 +0200 Message-ID: <87bn5dupt4.fsf@artlab.createcnix.lan> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:58734) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aqSw2-0006pU-F8 for emacs-orgmode@gnu.org; Wed, 13 Apr 2016 18:06:55 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1aqSvz-00010k-9E for emacs-orgmode@gnu.org; Wed, 13 Apr 2016 18:06:54 -0400 Received: from smtp2.tech.numericable.fr ([82.216.111.38]:36645) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aqSvy-0000zj-Us for emacs-orgmode@gnu.org; Wed, 13 Apr 2016 18:06:51 -0400 Received: from artlab.createcnix.lan (89-157-3-65.rev.numericable.fr [89.157.3.65]) by smtp2.tech.numericable.fr (Postfix) with ESMTP id 2547568F0C for ; Thu, 14 Apr 2016 00:06:49 +0200 (CEST) Received: from artlab.createcnix.lan (localhost.createcnix.lan [127.0.0.1]) by artlab.createcnix.lan (Postfix) with ESMTPS id 7A4085E975 for ; Thu, 14 Apr 2016 00:06:15 +0200 (CEST) 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" To: emacs-orgmode@gnu.org Hi fellow org-moders, I am seeking to list all actions in "NEXT" state that are not planned yet (scheduled, deadline or planning tag such as WEEK, MONTH, and other well known :). I will consider as planned an action which is in a subtree of a parent action which is itself planned. That's easy for tags, since I have inheritance, but according to http://article.gmane.org/gmane.emacs.orgmode/49215, there is no inheritance for SCHEDULED and DEADLINE properties. So, I inspired myself from the proposed solution and I wrote the following function, used in an agenda block=C2=A0: #+BEGIN_SRC lisp ;; Function to skip scheduled or deadline (defun r3v/skip-inherited-scheduled-or-deadline () "Skip tasks that inherit from SCHEDULED or DEADLINE" (let ((next-headline (save-excursion (or (outline-next-heading) (point-= max)))) (inherited-scheduled (org-entry-get-with-inheritance "SCHEDULED")= ) (inherited-deadline (org-entry-get-with-inheritance "DEADLINE"))) ;; I will consider the scheduled part if I can make it work with ;; deadlines first (if (org-not-nil inherited-deadline) next-headline nil))) ;; Extract from agenda block (tags "-WAITING-CANCELLED-WEEK-MONTH-SOMEDAY/NEXT" ((org-agenda-overriding-header "Non planned 'NEXT' actions") (org-agenda-skip-function 'r3v/skip-inherited-scheduled-or-dea= dline) ;; I don't think this one is needed, but in case I enabled it: (org-use-property-inheritance t) (org-agenda-todo-ignore-scheduled t) (org-agenda-todo-ignore-deadlines t) (org-agenda-todo-ignore-with-date t) (org-tags-match-list-sublevels t) (org-agenda-sorting-strategy '(priority-down todo-state-down effort-up category-up)))) #+END_SRC However, it never detects a deadline, or scheduled property, *even if assigned on the heading itself*. I tried that on a very simple subtree=C2=A0: #+BEGIN_SRC org * TODO Parent todo DEADLINE: <2016-04-15 ven.> :PROPERTIES: :ParentProp: ValPar :END: ** NEXT SubAction :PROPERTIES: :SubProp: Val :END: #+END_SRC I also tried to eval the following expression, manually from the tree=C2=A0= : #+BEGIN_SRC lisp ;;;;; With DEADLINE properties, the behavior acts strangely ;;;;; (org-entry-get nil "DEADLINE") ;; As expected: ;; - On "Parent todo", returns <2016-04-15 ven.> ;; - On "SubAction", returns nil (org-entry-get nil "DEADLINE" t) ;; As expected: ;; - On "Parent todo", returns <2016-04-15 ven.> ;; /!\ NOT expected: ;; - On "SubAction", still returns nil (org-entry-get-with-inheritance "DEADLINE") ;; /!\ NOT expected: ;; - On "Parent todo", returns nil ;; - On "SubAction", returns nil ;;;;; With custom properties, it works as I expect it ;;;;; (org-entry-get nil "ParentProp") ;; - On "Parent todo", returns "ValPar" ;; - On "SubAction", returns nil (org-entry-get nil "ParentProp" t) ;; - On "Parent todo", returns "ValPar" ;; - On "SubAction", returns "ValPar" (org-entry-get-with-inheritance "ParentProp") ;; - On "Parent todo", returns "ValPar" ;; - On "SubAction", returns "ValPar" #+END_SRC Globally, org-use-property-inheritance is set to nil. I currently have Org "8.3.3-43-g0b97a5-elpaplus" from ELPA as reported. There might also be an easier way I didn't think of to achieve what I want (list actions not planned), but I would also like to understand what's wrong or what should be done to make the function work. Any help will be appreciated :) Kind Regards, Christophe --=20 ---------------> mailto:R3vLibre@citadels.eu Once it's perfectly aimed, the flying arrow goes straight to its target. Thus, don't worry when things go right. There will be enough time to worry about if they go wrong. Then, it's time to fire a new arrow towards another direction. Don't sink. Adapt yourself ! The archer has to shoot accurately and qui= ckly. [Words of Erenthar, the bowman ranger] <---------------<<<<