Index: sql.clj
===================================================================
--- sql.clj	(revision 274)
+++ sql.clj	(working copy)
@@ -80,9 +80,9 @@
   (with-open [stmt (.prepareStatement (connection) sql)]
       (doseq [set sets
               [index value] (map vector (iterate inc 1) set)]
-          (.setObject stmt index value)
-        (.addBatch stmt))
-    (.executeBatch stmt)))
+          (.setObject stmt index value))
+      (.addBatch stmt)
+      (.executeBatch stmt)))
 
 (defn create-table
   "Creates a table on the open database connection given a name (a string
