summaryrefslogtreecommitdiff
path: root/vendor/html.fnl
diff options
context:
space:
mode:
authorunwox <me@unwox.com>2024-10-07 17:24:05 +0600
committerunwox <me@unwox.com>2024-10-07 17:24:05 +0600
commit0f4599c4df2291fe982a36d5df07983c860b89f9 (patch)
tree3717fd59e94aceba442f1bb03d7c6cab647ef959 /vendor/html.fnl
parent838b49cb7b5895a8f2e334158ba47ff8f2734ed7 (diff)
html: escape property values
Diffstat (limited to 'vendor/html.fnl')
-rw-r--r--vendor/html.fnl2
1 files changed, 1 insertions, 1 deletions
diff --git a/vendor/html.fnl b/vendor/html.fnl
index 689f416..1be5d5d 100644
--- a/vendor/html.fnl
+++ b/vendor/html.fnl
@@ -14,7 +14,7 @@
(assert (= (type attrs) "table") (.. "Missing attrs table: " tag-name))
(let [attr-str (table.concat (icollect [k v (pairs attrs)]
(if (= v true) k
- (.. k "=\"" v"\""))) " ")]
+ (.. k "=\"" (escape v)"\""))) " ")]
(.. "<" tag-name " " attr-str">")))
(fn render [document allow-no-escape?]