From fed01fba73f2d69754b55243889fe4bfa9cbd916 Mon Sep 17 00:00:00 2001 From: Andrey Antukh Date: Tue, 10 Mar 2026 14:58:19 +0000 Subject: [PATCH] :bug: Wrap fetch TypeError into proper ex-info with :unable-to-fetch code Signed-off-by: Andrey Antukh --- frontend/src/app/util/http.cljs | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/frontend/src/app/util/http.cljs b/frontend/src/app/util/http.cljs index bf35ce96fd..0fd9be60b7 100644 --- a/frontend/src/app/util/http.cljs +++ b/frontend/src/app/util/http.cljs @@ -104,10 +104,17 @@ (.next ^js subscriber response) (.complete ^js subscriber))) (p/catch - (fn [err] + (fn [cause] (vreset! abortable? false) (when-not @unsubscribed? - (.error ^js subscriber err)))) + (let [error (ex-info (ex-message cause) + {:type :internal + :code :unable-to-fetch + :hint "unable to perform fetch operation" + :uri uri + :headers headers} + cause)] + (.error ^js subscriber error))))) (p/finally (fn [] (let [{:keys [count average] :or {count 0 average 0}} (get @network-averages (:path uri))