Hello,

Robert Klein <klein...@mpip-mainz.mpg.de> writes:

> If i set :html-preable to either s2-preamble or 's2-preamble nothing 
> gets inserted.
>
> I studied the code in org-e-html (excerpt below), but i don't see what I 
> did wrong.
>
> #+begin_src elisp :file contrib/lisp/org-e-html.el :firstline 1329
> (defun org-e-html-preamble (info)
>    (when (plist-get info :html-preamble)
>      (let* ((title (org-export-data (plist-get info :title) info))
>          (date (org-e-html-format-date info))
>          (author (org-export-data (plist-get info :author) info))
>          (email (plist-get info :email))
>          (html-pre-real-contents
>           (cond
>            ((functionp (plist-get info :html-preamble))
>             (with-temp-buffer
>               (funcall (plist-get info :html-preamble))
>               (buffer-string)))
> #+end_src

That's because the code expects the function to write to a buffer
instead of simply returning a string, which is wrong IMO.

The condition should simply be:

  ((functionp (plist-get info :html-preamble))
   (funcall (plist-get info :html-preamble)))

I will change this in a few hours unless someone beats me to it.


Regards,

-- 
Nicolas Goaziou

Reply via email to