From: Eshel Yaron <me@eshelyaron.com>
Date: Fri, 18 Aug 2023 16:23:01 +0000 (+0200)
Subject: Improve texinfo to HTML Sweep manual export
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8fd12968f63d0d7fddc19cfd79025eeac6b2bc61;p=esy-publish.git

Improve texinfo to HTML Sweep manual export
---

diff --git a/esy-publish.el b/esy-publish.el
index 789ea08..c9f635b 100644
--- a/esy-publish.el
+++ b/esy-publish.el
@@ -403,6 +403,48 @@
                 "--html"
                 "--css-ref" "../../style.css"
                 "-c" "TREE_TRANSFORMATIONS=regenerate_master_menu"
+                "-c" (concat "AFTER_BODY_OPEN="
+                             (esy-publish--dom-to-string
+                              '(div ((id . "preamble")
+                                     (class . "status"))
+                                    (nav ((id . "icon-links")
+                                          (class . "icon-links"))
+                                         (div ((class . "home-link"))
+                                              (a ((href . "/"))
+                                                 (img ((src . "/home.svg")
+                                                       (height . "35")
+                                                       (width . "35")
+                                                       (alt . "Home")))))
+                                         (div ((class . "other-links"))
+                                              (a ((href . "mailto:me@eshelyaron.com"))
+                                                 (img ((src . "/mail.svg")
+                                                       (height . "30")
+                                                       (width . "30")
+                                                       (alt . "Mail"))))
+                                              " "
+                                              (a ((href . "https://emacs.ch/@eshel")
+                                                  (rel . "me"))
+                                                 (img ((src . "/mastodon.svg")
+                                                       (height . "28")
+                                                       (width . "28")
+                                                       (alt . "Mastodon"))))
+                                              " "
+                                              (a ((href . "/rss.xml"))
+                                                 (img ((src . "/rss.svg")
+                                                       (height . "30")
+                                                       (width . "30")
+                                                       (alt . "RSS Feed")))))))
+                              '(hr nil)))
+                "-c" (concat "PRE_BODY_CLOSE="
+                             (esy-publish--dom-to-string
+                              '(div ((id . "postamble")
+                                     (class . "status"))
+                                    (footer ((id . "footer")
+                                             (class . "footer"))
+                                            (hr nil)
+                                            "© "
+                                            (time ((class . "copyright-year")) "2023")
+                                            " Eshel Yaron"))))
                 ;; TODO - also add @contents
                 "--output" (expand-file-name "sweep" esy-publish-local-man-directory)
                 (expand-file-name "sweep/sweep.texi" esy-publish-root-directory)))
diff --git a/source/index.org b/source/index.org
index 2a929b8..7585176 100644
--- a/source/index.org
+++ b/source/index.org
@@ -42,10 +42,11 @@ this website itself.
 :CUSTOM_ID: sweep
 :END:
 
-[[https://git.sr.ht/~eshel/sweep][Sweep]] is an Emacs module which uses the C interfaces of both
+[[https://git.sr.ht/~eshel/sweep][Sweep]] is an Emacs package that uses the C interfaces of both
 SWI-Prolog and Emacs to bring the two together into one address space.
 
-For more details, see [[file:sweep.org][the Sweep manual]].
+For more details, see [[file:sweep.org][the Sweep manual]].  You can also browse it in
+[[./man/sweep/][multi-page format]].
 
 ** Dict: Emacs client for RFC2229 dictionary servers
 :PROPERTIES:
diff --git a/source/style.css b/source/style.css
index 5838209..ee39b28 100644
--- a/source/style.css
+++ b/source/style.css
@@ -329,3 +329,7 @@ Generated with `M-x org-html-htmlize-generate-css` after loading the
 samp {
     color: #00c089;
 }
+
+.nav-panel {
+  font-size: smaller;
+}