aboutsummaryrefslogtreecommitdiff
path: root/src/clojure/contrib/sql.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/clojure/contrib/sql.clj')
-rw-r--r--src/clojure/contrib/sql.clj7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/clojure/contrib/sql.clj b/src/clojure/contrib/sql.clj
index b3c61ae7..18d87d95 100644
--- a/src/clojure/contrib/sql.clj
+++ b/src/clojure/contrib/sql.clj
@@ -132,6 +132,13 @@
[table & rows]
(apply insert-values table nil rows))
+(defn insert-records
+ "Inserts records into a table. records are maps from strings or
+ keywords (identifying columns) to values."
+ [table & records]
+ (doseq [record records]
+ (insert-values table (keys record) (vals record))))
+
(defn delete-rows
"Deletes rows from a table. where-params is a vector containing a string
providing the (optionally parameterized) selection criteria followed by