Fix eltuki for org 8.0

This commit is contained in:
Tom Willemse 2013-05-25 00:26:32 +02:00
parent 14adb384f1
commit eead1109c4

View file

@ -174,9 +174,11 @@
(defun eltuki-write-content (dir)
(let ((org-export-with-toc nil)
(filename (concat dir "/content")))
(with-current-buffer (org-export-region-as-html
(point-min) (point-max) t "*eltuki-html*")
(org-export-with-section-numbers nil)
(filename (concat dir "/content"))
(org-export-show-temporary-export-buffer nil))
(org-html-export-as-html nil nil nil t)
(with-current-buffer "*Org HTML Export*"
(write-region (point-min) (point-max) filename)
(kill-buffer))
filename))