From e216b1071642bbbf2b12ed800785a298ed162e81 Mon Sep 17 00:00:00 2001 From: Andrey Antukh Date: Wed, 31 Jan 2024 16:38:52 +0100 Subject: [PATCH] :bug: Fix raw data export import on debug interface --- backend/src/app/http/debug.clj | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/backend/src/app/http/debug.clj b/backend/src/app/http/debug.clj index 3f5d6a7b7..fe1fddc40 100644 --- a/backend/src/app/http/debug.clj +++ b/backend/src/app/http/debug.clj @@ -100,11 +100,11 @@ (let [profile (profile/get-profile pool profile-id) project-id (:default-project-id profile)] - (db/run! pool (fn [{:keys [::db/conn]}] - (create-file conn {:id file-id - :name (str "Cloned file: " filename) - :project-id project-id - :profile-id profile-id}) + (db/run! pool (fn [{:keys [::db/conn] :as cfg}] + (create-file cfg {:id file-id + :name (str "Cloned file: " filename) + :project-id project-id + :profile-id profile-id}) (db/update! conn :file {:data data} {:id file-id}) @@ -141,11 +141,11 @@ {::rres/status 200 ::rres/body "OK UPDATED"}) - (db/run! pool (fn [{:keys [::db/conn]}] - (create-file conn {:id file-id - :name fname - :project-id project-id - :profile-id profile-id}) + (db/run! pool (fn [{:keys [::db/conn] :as cfg}] + (create-file cfg {:id file-id + :name fname + :project-id project-id + :profile-id profile-id}) (db/update! conn :file {:data data} {:id file-id})