diff --git a/emacs/site-lisp/eltuki.el b/emacs/site-lisp/eltuki.el index d457a0f..c64d20a 100644 --- a/emacs/site-lisp/eltuki.el +++ b/emacs/site-lisp/eltuki.el @@ -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))