diff options
Diffstat (limited to 'src/clojure/contrib/sql.clj')
| -rw-r--r-- | src/clojure/contrib/sql.clj | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/clojure/contrib/sql.clj b/src/clojure/contrib/sql.clj index e4dbd5be..33bd2495 100644 --- a/src/clojure/contrib/sql.clj +++ b/src/clojure/contrib/sql.clj @@ -78,10 +78,10 @@ parameter sets" [sql & sets] (with-open [stmt (.prepareStatement (connection) sql)] - (doseq [set sets] - (doseq [[index value] (map vector (iterate inc 1) set)] - (.setObject stmt index value)) - (.addBatch stmt)) + (doseq [set sets + [index value] (map vector (iterate inc 1) set)] + (.setObject stmt index value) + (.addBatch stmt)) (.executeBatch stmt))) (defn create-table |