fixes #235

2025-08-03 18:13:19 +08:00 · 2021-08-20 20:37:18 +03:00
parent e6307f8cc0
commit 14cfdb75ef
1 changed files with 5 additions and 2 deletions
--- a/src/daiquiri/util.cljc
+++ b/src/daiquiri/util.cljc
@ -55,8 +55,11 @@
 (defn fragment-tag?
  "Returns true if `tag` is the fragment tag \"*\" or \"<>\", otherwise false."
  [tag]
-  (or (= (name tag) "*")
-      (= (name tag) "<>")))
+  (and (or (keyword? tag)
+           (symbol? tag)
+           (string? tag))
+       (or (= (name tag) "*")
+           (= (name tag) "<>"))))

 (defn fragment? [v]
  (and (vector? v)