From 2d2656f6a713c7c6431dc488de0e16eebc68244f Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Fri, 19 May 2023 14:45:59 +0200 Subject: [PATCH] org-element-ast: Add setters for `org-element-property' and `org-element-property-1' --- lisp/org-element-ast.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/lisp/org-element-ast.el b/lisp/org-element-ast.el index 837311cce..227b89e74 100644 --- a/lisp/org-element-ast.el +++ b/lisp/org-element-ast.el @@ -516,6 +516,12 @@ 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)))) +(gv-define-setter org-element-property (value property node &optional _) + `(org-element-put-property ,node ,property ,value)) + +(gv-define-setter org-element-property-1 (value property node &optional _) + `(org-element-put-property ,node ,property ,value)) + ;;;; Node contents. (defsubst org-element-contents (node)