perf: reduce str & pr-str calls

Bad3r · Dec 12, 2024 · ebbb53c · ebbb53c
1 parent 1bd5028
commit ebbb53c
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 5 deletions.
diff --git a/src/main/frontend/components/property/value.cljs b/src/main/frontend/components/property/value.cljs
@@ -756,7 +756,7 @@
            state)}
   [state value block property page-cp]
   (when value
-    (if (state/sub-async-query-loading value)
+    (if (state/sub-async-query-loading (:block/uuid value))
       [:div.text-sm.opacity-70 "loading"]
       (if-let [v-block (db/sub-block (:db/id value))]
         (let [class? (ldb/class? v-block)

diff --git a/src/main/frontend/state.cljs b/src/main/frontend/state.cljs
@@ -2286,10 +2286,11 @@ Similar to re-frame subscriptions"
 
 (defn sub-async-query-loading
   [k]
-  (assert (some? k))
-  (rum/react
-   (r/cached-derived-atom (:db/async-query-loading @state) [(get-current-repo) ::async-query (str k)]
-                          (fn [s] (contains? s (str k))))))
+  (assert (or (string? k) (uuid? k)))
+  (let [k* (str k)]
+    (rum/react
+     (r/cached-derived-atom (:db/async-query-loading @state) [(get-current-repo) ::async-query k*]
+                            (fn [s] (contains? s k*))))))
 
 (defn clear-async-query-state!
   []