From 3e37d3990d23efee87572c07b8ae9b00c64eab79 Mon Sep 17 00:00:00 2001
From: Vincent Ambo <tazjin@gmail.com>
Date: Mon, 13 Nov 2017 16:42:29 +0100
Subject: [PATCH] refactor: Load preamble from an HTML file, too.

---
 blog.el       | 8 ++++----
 preamble.html | 6 ++++++
 2 files changed, 10 insertions(+), 4 deletions(-)
 create mode 100644 preamble.html

diff --git a/blog.el b/blog.el
index accfda078..d968c9ce2 100644
--- a/blog.el
+++ b/blog.el
@@ -20,15 +20,13 @@
   :group 'elblog
   :type 'string)
 
-;; org-mode settings need to be configured a certain way for elblog's HTML
-;; templating to work correctly.
 (defun configure-org-html-export ()
+  "Configure org-mode settings for elblog's HTML templating to work correctly."
   (setq org-html-postamble t)
   (setq org-html-doctype "html5")
   (setq org-html-head-include-scripts nil)
   (setq org-html-style-default (f-read-text "blog.css"))
-  (setq org-html-preamble-format
-        '(("en" "<header><h1><a class=\"unstyled-link\" href=\"/\">Tazjin&#39;s blog</a></h1><hr></header>")))
+  (setq org-html-preamble-format `(("en" ,(f-read-text "preamble.html"))))
   (setq org-html-postamble-format `(("en" ,(f-read-text "postamble.html")))))
 
 ;; Article fetching & rendering functions
@@ -85,3 +83,5 @@
 (defun stop-elblog ()
   (interactive)
   (elnode-stop elblog-port))
+
+(provide 'elblog)
diff --git a/preamble.html b/preamble.html
new file mode 100644
index 000000000..38fe179c5
--- /dev/null
+++ b/preamble.html
@@ -0,0 +1,6 @@
+<header>
+  <h1>
+    <a class="unstyled-link" href="/">Tazjin&#39;s blog</a>
+  </h1>
+  <hr>
+</header>