emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Thorsten Jolitz <tjolitz@gmail.com>
To: emacs-orgmode@gnu.org
Subject: Re: How to represent parse-tree so that 'org-element-interpret-data' works?
Date: Tue, 10 Sep 2013 09:50:33 +0200	[thread overview]
Message-ID: <87wqmpnmie.fsf@gmail.com> (raw)
In-Reply-To: 87k3iptw5e.fsf@gmail.com

Thorsten Jolitz <tjolitz@gmail.com> writes:

> Hi List, 

> How do I get the printed representation of an org-file parse-tree that can be
> reverted to the original org-file with `'org-element-interpret-data'?

Ups, I just figured out that this actually works:

#+begin_src emacs-lisp
  (org-element-interpret-data '#1=(org-data nil #2=(section (:begin
  1 :end 20 :contents-begin 1 :contents-end 20 :post-blank
  0 :parent #1#) (keyword (:key "OPTIONS" :value "toc:nil" :begin
  1 :end 20 :post-blank 0 :post-affiliated 1 :parent #2#)))
  #3=(headline (:raw-value "A" :begin 20 :end 26 :pre-blank
  0 :hiddenp outline :contents-begin 24 :contents-end 26 :level
  1 :priority nil :tags nil :todo-keyword nil :todo-type
  nil :post-blank 0 :footnote-section-p nil :archivedp
  nil :commentedp nil :quotedp nil :CATEGORY nil :title (#("A" 0
  1 (:parent #3#))) :parent #1#) #4=(section (:begin 24 :end
  26 :contents-begin 24 :contents-end 26 :post-blank 0 :parent #3#)
  #5=(paragraph (:begin 24 :end 26 :contents-begin 24 :contents-end
  26 :post-blank 0 :post-affiliated 24 :parent #4#) #("B" 0
  2 (:parent #5#)))))))
#+end_src

,--------------------
| "#+OPTIONS: toc:nil
| * A
| B
| "
`--------------------

so using (print-circle t) and quoting the result does the trick. 

Sorry for the noise.

-- 
cheers,
Thorsten

      reply	other threads:[~2013-09-10  7:55 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-09-09 23:25 How to represent parse-tree so that 'org-element-interpret-data' works? Thorsten Jolitz
2013-09-10  7:50 ` Thorsten Jolitz [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87wqmpnmie.fsf@gmail.com \
    --to=tjolitz@gmail.com \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).