WHOOPS! Introduced bugs when I was supposed just to be documenting.

This commit is contained in:
Simon Brooke 2020-02-19 21:18:06 +00:00
parent b2ee34bd8e
commit a775ef7b83
No known key found for this signature in database
GPG key ID: A7A4F18D1D4DF987
2 changed files with 38 additions and 38 deletions

View file

@ -106,11 +106,11 @@
{:from :smeagol-site-title :to :site-title}))
(defn- build-config
(def build-config
"The actual configuration, as a map. The idea here is that the config
file is read (if it is specified and present), but that individual
values can be overridden by environment variables."
[]
(memoize (fn []
(try
(log/info (str "Reading configuration from " config-file-path))
(let [file-contents (try
@ -144,8 +144,8 @@
config)
(catch Exception any
(log/error any "Could not load configuration")
{})))
{})))))
(def config
"The actual configuration, as a map."
(memoize build-config))
(build-config))

View file

@ -48,7 +48,7 @@
(declare process-text)
(defn- process-backticks
(defn process-backticks
"Effectively, escape the backticks surrounding this `text`, by protecting them
from the `process-text` filter.