From 77c2a98304ee49287437a45101049c0ae98d55a9 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Tue, 4 May 2021 15:13:44 +0200
Subject: [PATCH] :tada: Add insert-multi helper on db namespace.

---
 backend/src/app/db.clj     | 7 +++++++
 backend/src/app/db/sql.clj | 5 +++++
 2 files changed, 12 insertions(+)

diff --git a/backend/src/app/db.clj b/backend/src/app/db.clj
index 32a91e8d66..75412606d3 100644
--- a/backend/src/app/db.clj
+++ b/backend/src/app/db.clj
@@ -200,6 +200,13 @@
               (sql/insert table params opts)
               (assoc opts :return-keys true))))
 
+(defn insert-multi!
+  ([ds table cols rows] (insert-multi! ds table cols rows nil))
+  ([ds table cols rows opts]
+   (exec! ds
+          (sql/insert-multi table cols rows opts)
+          (assoc opts :return-keys true))))
+
 (defn update!
   ([ds table params where] (update! ds table params where nil))
   ([ds table params where opts]
diff --git a/backend/src/app/db/sql.clj b/backend/src/app/db/sql.clj
index d2c92db383..6ee5d3073c 100644
--- a/backend/src/app/db/sql.clj
+++ b/backend/src/app/db/sql.clj
@@ -32,6 +32,11 @@
                 (assoc :suffix "ON CONFLICT DO NOTHING"))]
      (sql/for-insert table key-map opts))))
 
+(defn insert-multi
+  [table cols rows opts]
+  (let [opts (merge default-opts opts)]
+    (sql/for-insert-multi table cols rows opts)))
+
 (defn select
   ([table where-params]
    (select table where-params nil))