dotfiles/bin/generate-html.el

33 lines
805 B
EmacsLisp
Executable File

(package-initialize)
(require 'ox-html)
(require 'htmlize)
(defmacro do-nothing (name)
`(defun ,name (&rest args) nil))
(do-nothing imalison:add-to-org-agenda-files)
(do-nothing imalison:disable-linum-mode)
(setq emacs-dir
(expand-file-name "../dotfiles/emacs.d/"
(file-name-directory load-file-name)))
(setq readme-src (concat emacs-dir "README.org"))
(org-babel-tangle-file readme-src)
(require 'use-pacakge)
(load-file (concat emacs-dir "org-config.el"))
(defun export-target (target)
(with-current-buffer (find-file-noselect target)
(let ((org-export-headline-levels 10))
(org-html-export-to-html))))
(setq org-html-postamble nil)
(setq org-html-htmlize-output-type 'css)
(setq org-confirm-babel-evaluate nil)
(message (export-target readme-src))