tec/emacs-config
tec
/
emacs-config
1
0
Fork 0
Code Issues 4 Pull Requests Releases Activity

Publish listing of generated files

This commit is contained in:
TEC 2024-03-25 23:56:31 +08:00
parent 1907b9bd27
commit 959d8dbbca
Signed by: tec
SSH Key Fingerprint: SHA256:eobz41Mnm0/iYWBvWThftS0ElEs1ftBr6jamutnXc/A
3 changed files with 71 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
README.org
View File

@ -13,7 +13,7 @@ Here you may find my config. There is only one significant file:
[[file:misc/screenshots/splash-screen.png]]
=config.org= /generates/ the [[https://tecosaur.github.io/emacs-config/engraved/init.el.html][init.el]], [[https://tecosaur.github.io/emacs-config/engraved/config.el.html][config.el]], and [[https://tecosaur.github.io/emacs-config/engraved/packages.el.html][packages.el]] files, as well as
about a dozen others.
about a hundred others. See [[https://tecosaur.github.io/emacs-config/files.html][this listing]] for more information.
Other than that, resources are put in [[file:misc/][misc]], and you may find submodules for
packages of mine in [[file:lisp/][lisp]].

68
misc/config-publishing/files.sh Executable file
View File

@ -0,0 +1,68 @@
#!/usr/bin/env sh
":"; exec emacs --quick --script "$0" -- "$@" # -*- mode: emacs-lisp; lexical-binding: t; -*-
(setq log-file (expand-file-name (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 'light)
;;; Actually do the exporting now
(message "[34] Creating pagelist")
(setq default-directory publish-dir)
(with-temp-buffer
(insert "<!DOCTYPE html>
<html lang=\"en\">
<head>
<meta charset=\"utf-8\" />
<title>Doom Emacs Configuration: Files</title>
<meta name=\"viewport\" content=\"width=device-width, initial-scale=1\" />
<meta name=\"theme-color\" content=\"#77aa99\" />
<style>
body { background: #fafafa; color: #383a42; margin: 0; padding: 1em; }
body > div { max-width: 60rem; margin: auto; }
p, li { font-size: 1.1em }
code { font-size: 1.2em; }
a { color: #4078f2; }
a:visited { color: #b751b6; }
</style>
</head>
<body>
<div>
<h1>Doom Emacs Configuration &mdash; Files</h1>
<p><a href=\"engraved/config.org.html\"><code>config.org</code></a> (<a href=\"config.html\">html</a>, <a href=\"config.pdf\">pdf</a>)</p>
<p>Upon <a href=\"https://en.wikipedia.org/wiki/Literate_programming\">tangling</a> this file,
every other file listed here is generated.</p>
<p>Doom cares about three in particular:</p>
<ul>
<li><a href=\"engraved/init.el.html\"><code>init.el</code></a></li>
<li><a href=\"engraved/packages.el.html\"><code>packages.el</code></a></li>
<li><a href=\"engraved/config.el.html\"><code>config.el</code></a></li>
</ul>
<h2>Generated sub-configuration</h2>
<p>The sub-configuration is a collection of generated fragments of configuration sourced from <code>config.org</code>.
See <a href=\"config.html#rudimentary-configuration-confpkg\">the section on it</a> for more information.</p>
<p>Many of these can be thought of as stand-alone packages</a>
<ul>")
(dolist (subconf (directory-files "subconf"))
(unless (member subconf '("." ".."))
(insert "\n <li><a href=\"engraved/subconf/" subconf
".html\"><code>" subconf "</code></a> (<a href=\"subconf/"
subconf "\">raw</a>)")))
(insert "\n</ul>\n</div>\n</body>\n</html>\n")
(write-region nil nil "files.html"))
(message "[1;32] Pagelist generated!")
(setq inhibit-message t)
(kill-emacs exit-code)

3
misc/config-publishing/publish.sh
View File

@ -13,7 +13,8 @@
(load (expand-file-name "async-proc-management.el") nil t)
(apm-exec '("subconf.sh" "engrave.sh" "check-package-updates.sh"))
(apm-exec "check-package-updates.sh")
(apm-exec "subconf.sh" :then '("engrave.sh" :then "files.sh"))
(if (not (file-exists-p (concat user-emacs-directory "xkcd/")))
(apm-exec "org-html.sh" :then "org-pdf.sh")