diff --git a/contrib/lisp/org-export.el b/contrib/lisp/org-export.el
index d85ef2eb6..149120814 100644
--- a/contrib/lisp/org-export.el
+++ b/contrib/lisp/org-export.el
@@ -3991,7 +3991,11 @@ BLOB is the element or object considered."
 
 (defun org-export-get-genealogy (blob)
   "Return full genealogy relative to a given element or object.
-BLOB is the element or object being considered."
+
+BLOB is the element or object being considered.
+
+Ancestors are returned from closest to farthest, the last one
+being the full parse tree."
   (let (genealogy (parent blob))
     (while (setq parent (org-element-property :parent parent))
       (push parent genealogy))