00d1a88ef7
A doom change now causes a y-or-n-p prompt to appear, so we need to make that non-interactive.
35 lines
1.1 KiB
Bash
Executable file
35 lines
1.1 KiB
Bash
Executable file
#!/usr/bin/env sh
|
|
":"; exec emacs --quick --script "$0" -- "$@" # -*- mode: emacs-lisp; lexical-binding: t; -*-
|
|
|
|
(setq log-file (format "%s-log.txt" (file-name-base load-file-name)))
|
|
|
|
(load (expand-file-name "initialise.el" (file-name-directory load-file-name)) nil t)
|
|
(initialise t)
|
|
|
|
;;; Actually do the exporting now
|
|
|
|
(message "[34] Opening config file: %s"
|
|
(expand-file-name "config.org" config-root))
|
|
|
|
(require 'vc) ; need this for modification-time macro
|
|
(require 'org)
|
|
|
|
(setq org-mode-hook nil)
|
|
(with-temp-buffer
|
|
(let ((buffer-file-name (expand-file-name "config.org" config-root))
|
|
(org-export-coding-system org-html-coding-system)
|
|
org-mode-hook)
|
|
(insert-file-contents (expand-file-name "config.org" config-root))
|
|
(message "[33] Exporting %s" (buffer-file-name))
|
|
(org-export-to-file 'html (expand-file-name "config.html" config-root))))
|
|
|
|
(publish "config.html" "misc/*.svg")
|
|
|
|
(make-symbolic-link (expand-file-name "config.html" publish-dir)
|
|
(expand-file-name "index.html" publish-dir))
|
|
|
|
(message "[1;32] Config export complete!")
|
|
|
|
(setq inhibit-message t)
|
|
(kill-emacs exit-code)
|