Bug fix for empty params
This commit is contained in:
parent
70c22add30
commit
aed569af61
1 changed files with 4 additions and 3 deletions
|
|
@ -54,11 +54,12 @@
|
||||||
""
|
""
|
||||||
^PreparedStatement
|
^PreparedStatement
|
||||||
[^PreparedStatement ps params]
|
[^PreparedStatement ps params]
|
||||||
|
(when (seq params)
|
||||||
(loop [[p & more] params i 1]
|
(loop [[p & more] params i 1]
|
||||||
(.setObject ps i p)
|
(.setObject ps i p)
|
||||||
(if more
|
(when more
|
||||||
(recur more (inc i))
|
(recur more (inc i)))))
|
||||||
ps)))
|
ps)
|
||||||
|
|
||||||
(defn- prepare*
|
(defn- prepare*
|
||||||
"Given a connection, a SQL statement, its parameters, and some options,
|
"Given a connection, a SQL statement, its parameters, and some options,
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue