tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-element-ast: New function `org-element-property-2'

This commit is contained in:
Ihor Radchenko 2023-05-15 13:30:32 +02:00
parent f611f131ee
commit 80122a1204
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-element-ast.el
View File

@ -516,6 +516,10 @@ except `:deferred', may not be resolved."
(inline-quote (org-element-property-1 ,property ,node ,dflt))
(inline-quote (org-element--property ,property ,node ,dflt ,force-undefer))))
(define-inline org-element-property-2 (node property &optional dflt force-undefer)
"Like `org-element-property', but reverse the order of NODE and PROPERTY."
(inline-quote (org-element-property ,property ,node ,dflt ,force-undefer)))
(gv-define-setter org-element-property (value property node &optional _)
`(org-element-put-property ,node ,property ,value))