Fix VALUES with multiple hash maps
This commit is contained in:
parent
15ace00e49
commit
d04d9f600a
1 changed files with 4 additions and 2 deletions
|
|
@ -310,7 +310,7 @@
|
|||
(let [cols (keys (first xs))
|
||||
[sqls params]
|
||||
(reduce (fn [[sql params] [sqls' params']]
|
||||
[(conj sql (str/join ", " sqls'))
|
||||
[(conj sql (str "(" (str/join ", " sqls') ")"))
|
||||
(if params' (into params params') params')])
|
||||
[[] []]
|
||||
(map (fn [m]
|
||||
|
|
@ -320,7 +320,9 @@
|
|||
(str/join ", "
|
||||
(map #(format-entity % {:drop-ns? true}) cols))
|
||||
") "
|
||||
(sql-kw k) " (" (str/join ", " sqls) ")")]
|
||||
(sql-kw k)
|
||||
" "
|
||||
(str/join ", " sqls))]
|
||||
params))
|
||||
|
||||
:else
|
||||
|
|
|
|||
Loading…
Reference in a new issue