fix kw->sym for cljs!
Signed-off-by: Sean Corfield <sean@corfield.org>
This commit is contained in:
parent
2c8fc30b1d
commit
74cf16c134
1 changed files with 3 additions and 1 deletions
|
|
@ -1734,7 +1734,9 @@
|
||||||
[k]
|
[k]
|
||||||
(if (keyword? k)
|
(if (keyword? k)
|
||||||
#?(:clj (.sym ^clojure.lang.Keyword k)
|
#?(:clj (.sym ^clojure.lang.Keyword k)
|
||||||
:default (subs (str k) 1))
|
:default (if-let [n (namespace k)]
|
||||||
|
(symbol n (name k))
|
||||||
|
(symbol (name k))))
|
||||||
k))
|
k))
|
||||||
|
|
||||||
(defn format-dsl
|
(defn format-dsl
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue