Function: org-element-extract

org-element-extract is a byte-compiled function defined in org-element-ast.el.gz.

Signature

(org-element-extract NODE)

Documentation

Extract NODE from parse tree.

Remove NODE from the parse tree by side-effect, and return it with its :parent property stripped out.

Aliases

org-element-extract-element

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-element-ast.el.gz
(defun org-element-extract (node)
  "Extract NODE from parse tree.
Remove NODE from the parse tree by side-effect, and return it
with its `:parent' property stripped out."
  (let ((parent (org-element-parent node))
	(secondary (org-element-secondary-p node)))
    (if secondary
        (org-element-put-property
	 parent secondary
	 (delq node (org-element-property secondary parent)))
      (apply #'org-element-set-contents
	     parent
	     (delq node (org-element-contents parent))))
    ;; Return NODE with its :parent removed.
    (org-element-put-property node :parent nil)))