[Q] How to get all the properties of the current subtree?

[Q] How to get all the properties of the current subtree?

[Rodrigo Morales]

[-- Attachment #1: Type: text/plain, Size: 1666 bytes --]

* Epilogue

Consider the following Org Mode file

#+CAPTION: The main.org file
#+BEGIN_SRC org
,* The first heading
:PROPERTIES:
:FOO: foo-value
:END:

,** The first subheading
:PROPERTIES:
:BAR: bar-value
:END:
#+END_SRC

I know that I can use the function =org-entry-properties= to get some
properties of the current subtree. Apparently, =org-entry-properties=
is only able to get the direct properties (i.e. it doesn't consider
the inherited properties)

#+BEGIN_SRC elisp
(with-current-buffer "main.org"
  (end-of-buffer)
  (pp-to-string (org-entry-properties)))
#+END_SRC

#+RESULTS:
#+begin_example
(("CATEGORY" . "main")
 ("BAR" . "bar-value")
 ("BLOCKED" . "")
 ("FILE" . "/home/beep1560/e/main.org")
 ("PRIORITY" . "B")
 ("ITEM" . "The first subheading"))
#+end_example

Note that even though =foo= is an inherited property of "The first
subheading", it is not obtained by =org-entry-properties=. Because
=foo= is an inherited property of "The first subheading", it can be
obtained by =org-entry-get= (see below).

#+BEGIN_SRC elisp
(with-current-buffer "main.org"
  (end-of-buffer)
  (org-entry-get nil "FOO" t))
#+END_SRC

#+RESULTS:
#+begin_example
foo-value
#+end_example

* The question

My question is: How to get all the properties (inherited properties
included) of the current subtree? In the example shown below, I would
expect the following result

#+BEGIN_EXAMPLE
(("CATEGORY" . "main")
 ("FOO" . "foo-value")
 ("BAR" . "bar-value")
 ("BLOCKED" . "")
 ("FILE" . "/home/beep1560/e/main.org")
 ("PRIORITY" . "B")
 ("ITEM" . "The first subheading"))
#+END_EXAMPLE

As I explained above, the function =org-entry-properties= doesn't
accomplish this.

[-- Attachment #2: Type: text/html, Size: 2388 bytes --]

Re: [Q] How to get all the properties of the current subtree?

[Ihor Radchenko]

Rodrigo Morales <moralesrodrigo1100@gmail.com> writes:

> My question is: How to get all the properties (inherited properties
> included) of the current subtree? In the example shown below, I would
> expect the following result

You would need to collect property names by running org-entry-properties
on current heading, it's parent, and so on. You can get parent headings
as (org-element-property :parent (org-element-at-point)) in newer Org or
using org-up-heading-safe.

Then, you can run org-entry-get on the acquired list of property names.

Best,
Ihor