forked from mirrors/org-mode
org-element-ast: New function `org-element-property-2'
This commit is contained in:
parent
f611f131ee
commit
80122a1204
|
@ -516,6 +516,10 @@ except `:deferred', may not be resolved."
|
||||||
(inline-quote (org-element-property-1 ,property ,node ,dflt))
|
(inline-quote (org-element-property-1 ,property ,node ,dflt))
|
||||||
(inline-quote (org-element--property ,property ,node ,dflt ,force-undefer))))
|
(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 _)
|
(gv-define-setter org-element-property (value property node &optional _)
|
||||||
`(org-element-put-property ,node ,property ,value))
|
`(org-element-put-property ,node ,property ,value))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue