fix: inline hiccup

This commit is contained in:
Konstantinos Kaloutas
2022-10-06 13:15:30 +03:00
committed by Andelf
parent a36f56c8df
commit 604dd20d33

View File

@@ -1578,10 +1578,10 @@
["Inline_Hiccup" s] ;; String to hiccup
(ui/catch-error
[:div.warning {:title "Invalid hiccup"} s]
[:div.hiccup_html {:dangerouslySetInnerHTML
{:__html (-> (safe-read-string s)
(rum/render-static-markup)
(security/sanitize-html))}}])
[:span {:dangerouslySetInnerHTML
{:__html (-> (safe-read-string s)
(rum/render-static-markup)
(security/sanitize-html))}}])
["Inline_Html" s]
(when (not html-export?)