This should work in a recent Emacs. (require 'json) (defun org-as-json-to-file (&optional path) "Export the current Org-mode buffer as JSON to the supplied PATH." (interactive "Fwrite to file: ") (let ((tree (org-element-parse-buffer))) (org-element-map tree (append org-element-all-objects org-element-all-elements) (lambda (el) (org-element-put-property el :parent nil))) (with-temp-file path (insert (json-encode tree)))))
-- Eric Schulte https://cs.unm.edu/~eschulte PGP: 0x614CA05D