Fix #1391: support loading hiccup.page from source
This commit is contained in:
parent
682f8514fb
commit
ed22bb573b
1 changed files with 2 additions and 1 deletions
|
|
@ -64,7 +64,8 @@
|
||||||
(def hiccup-util-namespace
|
(def hiccup-util-namespace
|
||||||
{'*html-mode* html-mode
|
{'*html-mode* html-mode
|
||||||
'*escape-strings?* escape-strings?
|
'*escape-strings?* escape-strings?
|
||||||
'raw-string (copy-var util/raw-string uns)})
|
'raw-string (copy-var util/raw-string uns)
|
||||||
|
'to-uri (copy-var util/to-uri uns)})
|
||||||
|
|
||||||
(defn render-html [& contents]
|
(defn render-html [& contents]
|
||||||
(binding [util/*html-mode* @html-mode
|
(binding [util/*html-mode* @html-mode
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue