mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-29 20:07:46 +00:00
ox: Fix a docstring
* lisp/ox.el (org-export-get-node-property): Fix docstring.
This commit is contained in:
parent
d229dd9662
commit
0122746f5b
12
lisp/ox.el
12
lisp/ox.el
|
@ -4028,19 +4028,19 @@ inherited from parent headlines and FILETAGS keywords."
|
||||||
;; Add FILETAGS keywords and return results.
|
;; Add FILETAGS keywords and return results.
|
||||||
(org-uniquify (append (plist-get info :filetags) current-tag-list))))))
|
(org-uniquify (append (plist-get info :filetags) current-tag-list))))))
|
||||||
|
|
||||||
(defun org-export-get-node-property (property blob &optional inherited)
|
(defun org-export-get-node-property (property datum &optional inherited)
|
||||||
"Return node PROPERTY value for BLOB.
|
"Return node PROPERTY value for DATUM.
|
||||||
|
|
||||||
PROPERTY is an upcase symbol (i.e. `:COOKIE_DATA'). BLOB is an
|
PROPERTY is an upcase symbol (e.g., `:COOKIE_DATA'). DATUM is an
|
||||||
element or object.
|
element or object.
|
||||||
|
|
||||||
If optional argument INHERITED is non-nil, the value can be
|
If optional argument INHERITED is non-nil, the value can be
|
||||||
inherited from a parent headline.
|
inherited from a parent headline.
|
||||||
|
|
||||||
Return value is a string or nil."
|
Return value is a string or nil."
|
||||||
(let ((headline (if (eq (org-element-type blob) 'headline) blob
|
(let ((headline (if (eq (org-element-type datum) 'headline) datum
|
||||||
(org-export-get-parent-headline blob))))
|
(org-export-get-parent-headline datum))))
|
||||||
(if (not inherited) (org-element-property property blob)
|
(if (not inherited) (org-element-property property datum)
|
||||||
(let ((parent headline))
|
(let ((parent headline))
|
||||||
(catch 'found
|
(catch 'found
|
||||||
(while parent
|
(while parent
|
||||||
|
|
Loading…
Reference in a new issue