diff options
Diffstat (limited to 'src/utils.clj')
| -rwxr-xr-x | src/utils.clj | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/utils.clj b/src/utils.clj index 7f56f61..dd5530a 100755 --- a/src/utils.clj +++ b/src/utils.clj @@ -58,10 +58,10 @@ (declare stringify-and-escape) (defn escape-html-deep [o] (if (map? o) - (stringify-and-escape o) - (if (seq? o) - (map escape-html-deep o) - (escape-html o)))) + (stringify-and-escape o) + (cond (seq? o) (map escape-html-deep o) + (or (true? o) (false? o)) o + :else (escape-html o)))) (defn stringify-and-escape [m] (zipmap (map str* (keys m)) (map escape-html-deep (vals m)))) |