From f1782f746da2fd94794f63529d66a6fba35f5282 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Wed, 15 Nov 2023 13:28:06 +0100
Subject: [PATCH] :sparkles: Add better error reporting on load-pointer
 function

---
 backend/src/app/rpc/commands/files.clj | 17 ++++++++++++-----
 1 file changed, 12 insertions(+), 5 deletions(-)

diff --git a/backend/src/app/rpc/commands/files.clj b/backend/src/app/rpc/commands/files.clj
index 7db6cd78af..7835a71ca4 100644
--- a/backend/src/app/rpc/commands/files.clj
+++ b/backend/src/app/rpc/commands/files.clj
@@ -170,11 +170,18 @@
 
 (defn load-pointer
   [conn file-id id]
-  (let [row (db/get conn :file-data-fragment
-                    {:id id :file-id file-id}
-                    {:columns [:content]
-                     ::db/check-deleted? false})]
-    (blob/decode (:content row))))
+  (let [{:keys [content]} (db/get conn :file-data-fragment
+                                  {:id id :file-id file-id}
+                                  {:columns [:content]
+                                   ::db/check-deleted? false})]
+    (when-not content
+      (ex/raise :type :internal
+                :code :fragment-not-found
+                :hint "fragment not found"
+                :file-id file-id
+                :fragment-id id))
+
+    (blob/decode content)))
 
 (defn- load-all-pointers!
   [{:keys [data] :as file}]