From mboxrd@z Thu Jan  1 00:00:00 1970
From: Oleh <ohwoeowho@gmail.com>
Subject: Does org export have something like Lisp quasiquote and unquote?
Date: Wed, 19 Feb 2014 16:07:32 +0100
Message-ID: <CAA01p3qfrrW8DeATWkw4Xozj6=0Xrxn4FoEre4KDp=JMd4=g7w@mail.gmail.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:52972)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <ohwoeowho@gmail.com>) id 1WG8kJ-0008B7-B6
	for emacs-orgmode@gnu.org; Wed, 19 Feb 2014 10:07:36 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <ohwoeowho@gmail.com>) id 1WG8kI-0000V9-Fq
	for emacs-orgmode@gnu.org; Wed, 19 Feb 2014 10:07:35 -0500
Received: from mail-wg0-x22a.google.com ([2a00:1450:400c:c00::22a]:43160)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <ohwoeowho@gmail.com>) id 1WG8kI-0000Tx-9w
	for emacs-orgmode@gnu.org; Wed, 19 Feb 2014 10:07:34 -0500
Received: by mail-wg0-f42.google.com with SMTP id k14so4164351wgh.5
	for <emacs-orgmode@gnu.org>; Wed, 19 Feb 2014 07:07:33 -0800 (PST)
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: org mode <emacs-orgmode@gnu.org>

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