From ef37abcbbd7639d99255a2cef466c2a80e75b4d6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andr=C3=A9s=20Moya?= <andres.moya@kaleidos.net>
Date: Wed, 25 May 2022 09:52:32 +0200
Subject: [PATCH] :bug: Allow debug load file with random uuid

---
 backend/src/app/http/debug.clj | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/backend/src/app/http/debug.clj b/backend/src/app/http/debug.clj
index a90520424..0c534a192 100644
--- a/backend/src/app/http/debug.clj
+++ b/backend/src/app/http/debug.clj
@@ -100,7 +100,10 @@
 
     (if (and data project-id)
       (let [fname (str "imported-file-" (dt/now))
-            file-id (uuid/uuid (-> params :file :filename))
+            file-id (try
+                      (uuid/uuid (-> params :file :filename))
+                      (catch Exception err
+                        (uuid/next)))
             file (db/exec-one! pool (sql/select :file {:id file-id}))]
         (if file
           (db/update! pool :file