emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Orgmode] Re: (org-entry-properties nil 'all) does not return inheri


From: Carsten Dominik
Subject: Re: [Orgmode] Re: (org-entry-properties nil 'all) does not return inherited properties
Date: Wed, 24 Mar 2010 13:37:30 +0100


On Mar 22, 2010, at 10:56 PM, Holger Macht wrote:

On Mon 22. Mar - 21:07:43, Emilio Jesús Gallego Arias wrote:
Holger Macht <address@hidden> writes:

On Mo 22. Mär - 18:44:38, Emilio Jesús Gallego Arias wrote:
Holger Macht <address@hidden> writes:

(org-entry-properties nil 'all) does not return inherited properties
added with a file directive like that:

#+PROPERTY: propkey propval

Is this by intention? If so, is there a method to get all the properties
of an item, also inherited ones?

Currently I was just able to find (org-entry-get), but this only returns
one specific property of which I need to know the name.

See:

,----[ C-h v org-use-property-inheritance RET ]

Have you tried? At least this doesn't have an effect on
(org-entry-properties in current git head.

Sorry Holger I misunderstood your question. I guess you should modify
org-entry-properties in order to include global properties like is done
in the inheritance case.

This does exactly what I want, thanks for the pointer. However, I'm
missing the overview to know what impact this might have. Just for
reference:

---
diff --git a/lisp/org.el b/lisp/org.el
index aa22309..ce57451 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -12663,7 +12663,11 @@ things up because then unnecessary parsing is avoided."
                (setq key (org-match-string-no-properties 1)
                      value (org-trim (or (org-match-string-no-properties 2) 
"")))
                (unless (member key excluded)
-                 (push (cons key (or value "")) props)))))
+                 (push (cons key (or value "")) props))))
+           (when org-use-property-inheritance
+             (setq props (append org-file-properties props)
+                   props (append org-global-properties props)
+                   props (append org-global-properties-fixed props))))
          (if clocksum
              (push (cons "CLOCKSUM"
                          (org-columns-number-to-string (/ (float clocksum) 60.)


On Mar 22, 2010, at 11:34 PM, Emilio Jesús Gallego Arias wrote:

Holger Macht <address@hidden> writes:

This does exactly what I want, thanks for the pointer. However, I'm
missing the overview to know what impact this might have. Just for
reference:

IMHO, this change should be safe to include.



Hi Holger, hi Emilio,

this is a good attempt at creating a function that gives all
properties of an entry including inherited ones.  However,
there are problems:

1. org-entry-properties is not supposed to give this result.
   It only returns what is present in the entry itself
   (yes, with ALLTAGS being the one exception)

2. The change is still not complete, because it will miss
   properties defined in in the parents and grandparents.

I would accept a patch that introduces a new function for this
purpose.  This function would start with calling org-entry-properties,
then it would walk the hierarchy using org-up-heading-safe, call
org-entry-properties at each stop and add the properties that
are not present yet and that satisfy org-property-inherit-p.
Finally, it would add file and global properties, as you did
in your patch.

Emilio, if Holgers patch was enough for you, just define
a separate function doing the adding of file and global properties
for you.

Finally, please note that property inheritance can slow down things,
so make sure to call these functions as little as possible in your code.

HTH

- Carsten







_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten







reply via email to

[Prev in Thread] Current Thread [Next in Thread]