turn dashes into underscores when formatting

This commit is contained in:
Justin Kramer 2012-08-16 14:50:08 -04:00
parent 212ebd31b4
commit e7265b60bb

View file

@ -67,9 +67,9 @@
(extend-protocol ToSql (extend-protocol ToSql
clojure.lang.Keyword clojure.lang.Keyword
(-to-sql [x] (name x)) (-to-sql [x] (-> x name (string/replace "-" "_")))
clojure.lang.Symbol clojure.lang.Symbol
(-to-sql [x] (str x)) (-to-sql [x] (-> x name (string/replace "-" "_")))
java.lang.Number java.lang.Number
(-to-sql [x] (str x)) (-to-sql [x] (str x))
java.lang.Boolean java.lang.Boolean