diff options
| author | scgilardi <scgilardi@gmail.com> | 2008-11-27 19:06:26 +0000 |
|---|---|---|
| committer | scgilardi <scgilardi@gmail.com> | 2008-11-27 19:06:26 +0000 |
| commit | 810032a81e0d9e393c6eca720a32d68c0afee5dd (patch) | |
| tree | d75a605f2f291f7f506fed1c2cbbcf478b54e3e8 /src/clojure/contrib/sql.clj | |
| parent | e02a316001666934f72cf1f8170c959c69371ef2 (diff) | |
pred.clj: make macro? work again
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 |