enhance(rtc): add query-blocks api

src/main/frontend/db/rtc/const.cljs

@@ -165,6 +165,12 @@
       [:req-id :string]
       [:action :string]
       [:graph-uuid :string]
+      [:block-uuids [:sequential :uuid]]]]
+    ["query-blocks"
+     [:map
+      [:req-id :string]
+      [:action :string]
+      [:graph-uuid :uuid]
       [:block-uuids [:sequential :uuid]]]]]))
 (def data-to-ws-encoder (m/encoder data-to-ws-schema mt/string-transformer))
 (def data-to-ws-coercer (m/coercer data-to-ws-schema mt/string-transformer))

src/main/frontend/db/rtc/core.cljs

@@ -838,6 +838,13 @@
             (prn ::<get-block-content-versions :ex-message ex-message :ex-data ex-data)
             versions))))))
 
+(defn <query-page-blocks
+  [state page-block-uuid]
+  (go
+    (when (some-> state :*graph-uuid deref)
+      (<! (ws/<send&receive state {:action "query-blocks" :graph-uuid @(:*graph-uuid state)
+                                   :block-uuids [page-block-uuid]})))))
+
 
 (defn init-state
   [ws data-from-ws-chan]