(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) (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))