ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix eltuki for org 8.0

Browse source
This commit is contained in:
Tom Willemse 2013-05-25 00:26:32 +02:00
parent 14adb384f1
commit eead1109c4
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
emacs/site-lisp/eltuki.el
View file

@ -174,9 +174,11 @@
(defun eltuki-write-content (dir) (defun eltuki-write-content (dir)
(let ((org-export-with-toc nil) (let ((org-export-with-toc nil)
(filename (concat dir "/content"))) (org-export-with-section-numbers nil)
(with-current-buffer (org-export-region-as-html (filename (concat dir "/content"))
(point-min) (point-max) t "*eltuki-html*") (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) (write-region (point-min) (point-max) filename)
(kill-buffer)) (kill-buffer))
filename)) filename))