Property inheritance in Org-collector

Property inheritance in Org-collector

[Christian Moe]

Hi,

I'm trying to use an Org document as the database for a textbook 
analysis and Org-collector.el to output reports.

With org-use-property-inheritance set to `t', and working in sparse 
trees, I fail to get inherited properties to show up in the dynamic 
block: the value returned is 0. Is this the expected behavior, and is 
there any way to change things so I can get inherited properties?

Yours,
Christian

Re: Property inheritance in Org-collector

[d.tchin]

Christian Moe <mail <at> christianmoe.com> writes:

> 
> Hi,
> 
> I'm trying to use an Org document as the database for a textbook 
> analysis and Org-collector.el to output reports.
> 
> With org-use-property-inheritance set to `t', and working in sparse 
> trees, I fail to get inherited properties to show up in the dynamic 
> block: the value returned is 0. Is this the expected behavior, and is 
> there any way to change things so I can get inherited properties?
> 

I am interested by this too. I tried to have inherited properties and 
had the same problem whereas I fixed org-use-property-inheritance 
to 't. 

I test that inheritance work with the following test :

* Inheritance
#+BEGIN: propview  :cols (ITEM test) :scope tree 
:conds ((string= test "appear")) 
| "ITEM"        | "test"   |
|---------------+----------|
| "First level" | "appear" |
|---------------+----------|
|               |          |
#+END:

#+BEGIN: propview :cols (ITEM CATEGORY) :scope tree 
:conds ((string= CATEGORY "level")) 
| "ITEM"               | "CATEGORY" |
|----------------------+------------|
| "First level"        | "level"    |
| "Test inheritance 1" | "level"    |
| "Test inheritance 2" | "level"    |
|----------------------+------------|
|                      |            |
#+END:

** First level
  :PROPERTIES:
  :test:     appear
  :CATEGORY:  level
  :COLUMNS:  %34ITEM %plats %ingredient
  :END:     
*** Test inheritance 1
    (org-entry-get (point) "test" t)
**** Test inheritance 2
     (org-entry-get (point) "test" t)
** Second level
*** Test inheritance 3
    (org-entry-get (point) "test" t)



I expect to have the same behavior for CATEGORY and test properties.
If you evaluate lisp expression you will notice that inheritance seems 
to works.

Re: Re: Property inheritance in Org-collector

[Eric Schulte]

Unfortunately inheritance of properties in Org-mode requires explicitly
requesting the property by name (aside from a couple of built-in
Org-mode properties e.g. CATEGORY)

I've just pushed up a change to org-collector which allows properties to
be explicitly inherited using a new :inherit keyword, this is
demonstrated in the example below.  Having to explicitly mention the
property to be inherited is not ideal, but hopefully it is sufficient.

Cheers -- Eric

* Inheritance
#+BEGIN: propview  :cols (ITEM test CATEGORY) :scope tree :inherit (test)
| "ITEM"             | "test"   | "CATEGORY"    |
|--------------------+----------+---------------|
| "Inheritance"      | 0        | "inheritence" |
| "First level"      | "appear" | "level"       |
| "Test inheritance" | "appear" | "level"       |
|--------------------+----------+---------------|
|                    |          |               |
#+END:

** First level
  :PROPERTIES:
  :test:     appear
  :CATEGORY:  level
  :COLUMNS:  %34ITEM %plats %ingredient
  :END:     

#+begin_src emacs-lisp
  (org-entry-get (point) "CATEGORY" t)
#+end_src

#+results:
: level

*** Test inheritance
The org-collector uses the org-entry-properties function to collect
properties.  Notice that this function *only* inherits some special
properties known to Org-mode
#+begin_src emacs-lisp
  (flet ((to-table (lst) (mapcar (lambda (pair) (list (car pair) (cdr pair))) lst)))
   (to-table (org-entry-properties)))
#+end_src

#+results:
| FILE     | /home/eschulte/Desktop/inheritence.org |
| BLOCKED  |                                        |
| CATEGORY | level                                  |

in such properties are mentioned explicitly in the code of
org-entry-properties, and the special function org-get-categories is
used to collect (and inherit) categories.  In fact even calling
org-entry-get inside of this subtree with inheritance explicitly set
to t is not sufficient to 

#+begin_src emacs-lisp
  (org-entry-get (point) "CATEGORY" t)
#+end_src

#+results:
: level

#+begin_src emacs-lisp
  (org-entry-get (point) "test" t)
#+end_src

#+results:
: appear

I expect to have the same behavior for CATEGORY and test properties.
If you evaluate lisp expression you will notice that inheritance seems 
to works.

Re: Property inheritance in Org-collector

[d.tchin]

Eric Schulte <schulte.eric <at> gmail.com> writes:

I used new version of org-collector as you suggested. It works well.

Thank you.

Regards.