From: Eric Schulte <schulte.eric@gmail.com>
To: Oleh <ohwoeowho@gmail.com>
Cc: org mode <emacs-orgmode@gnu.org>
Subject: Re: Does org export have something like Lisp quasiquote and unquote?
Date: Wed, 19 Feb 2014 10:27:03 -0700 [thread overview]
Message-ID: <87eh2zf1y0.fsf@gmail.com> (raw)
In-Reply-To: <CAA01p3qfrrW8DeATWkw4Xozj6=0Xrxn4FoEre4KDp=JMd4=g7w@mail.gmail.com> (Oleh's message of "Wed, 19 Feb 2014 16:07:32 +0100")
Oleh <ohwoeowho@gmail.com> writes:
> Hi all,
>
> I'd like to perform Elisp operations on org-mode buffer while exporting.
>
> Something like this (the comma unquotes like in Lisp quasiquote):
>
> ,(setq foo "(defun square (x)\n (* x x))")
>
> #+begin_src lisp
> ,foo
> #+end_src
> #+BEGIN_HTML
> ,(with-current-buffer
> (with-current-buffer (get-buffer-create "*temp*")
> (lisp-mode)
> (insert (upcase foo))
> (htmlize-buffer))
> (kill-buffer "*temp*")
> (buffer-string))
> #+END_HTML
>
> And I want it to be equivalent to:
>
> #+begin_src lisp
> (defun square (x)
> (* x x))
> #+end_src
> #+BEGIN_HTML
> <!-- html equivalent to above code upcased and fontified -->
> #+END_HTML
>
> Is something like this possible?
>
> regards,
> Oleh
>
The following will do what you want.
set the value
#+begin_src lisp :results silent
(defvar foo '(defun square (x) (* x x)))
#+end_src
#+begin_src lisp :results output pp code
foo
#+end_src
#+RESULTS:
#+BEGIN_SRC lisp
(DEFUN SQUARE (X) (* X X))
#+END_SRC
Best,
--
Eric Schulte
https://cs.unm.edu/~eschulte
PGP: 0x614CA05D
next prev parent reply other threads:[~2014-02-19 17:29 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-02-19 15:07 Does org export have something like Lisp quasiquote and unquote? Oleh
2014-02-19 17:27 ` Eric Schulte [this message]
2014-02-19 18:45 ` Oleh
2014-02-20 13:36 ` Eric Schulte
2014-02-20 16:56 ` Oleh
2014-02-20 18:13 ` Eric Schulte
2014-02-20 21:48 ` Alan Schmitt
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=87eh2zf1y0.fsf@gmail.com \
--to=schulte.eric@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=ohwoeowho@gmail.com \
/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).