From mboxrd@z Thu Jan  1 00:00:00 1970
From: Alan Schmitt <alan.schmitt@polytechnique.org>
Subject: running some elisp code when exporting a given file
Date: Thu, 05 Sep 2013 09:58:15 +0200
Message-ID: <m2ob87k8dk.fsf@polytechnique.org>
Mime-Version: 1.0
Content-Type: text/plain
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:55643)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <alan.schmitt@polytechnique.org>) id 1VHUSP-0004ew-R9
	for emacs-orgmode@gnu.org; Thu, 05 Sep 2013 03:58:33 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <alan.schmitt@polytechnique.org>) id 1VHUSI-0001lQ-Ho
	for emacs-orgmode@gnu.org; Thu, 05 Sep 2013 03:58:25 -0400
Received: from mail3-relais-sop.national.inria.fr ([192.134.164.104]:16416)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <alan.schmitt@polytechnique.org>) id 1VHUSI-0001kO-B5
	for emacs-orgmode@gnu.org; Thu, 05 Sep 2013 03:58:18 -0400
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: emacs-orgmode <emacs-orgmode@gnu.org>

Hello,

I would like to inline a css when exporting a file to html, but I don't
know how to tell org-mode to set the variable org-html-head from within
the file.

Here is what I tried: I added the following block at the beginning of my
file:

--8<---------------cut here---------------start------------->8---
#+BEGIN_SRC emacs-lisp :exports none
  (set (make-local-variable 'org-html-head) (concat
                             "<style type=\"text/css\">\n"
                             "<!--/*--><![CDATA[/*><!--*/\n"
                             (with-temp-buffer
                               (insert-file-contents "style.css")
                               (buffer-string))
                             "/*]]>*/-->\n"
                             "</style>\n"))
#+END_SRC
--8<---------------cut here---------------end--------------->8---

It does not seem to be evaluated, however.

Is there a way to have arbitrary code stored in the file being exported
being evaluated before an export?

Thanks,

Alan