diff --git a/src/main/frontend/db/rtc/core.cljs b/src/main/frontend/db/rtc/core.cljs index a13cbb390c..1ef68323fb 100644 --- a/src/main/frontend/db/rtc/core.cljs +++ b/src/main/frontend/db/rtc/core.cljs @@ -551,7 +551,6 @@ update-block-uuid->attrs)] [update-page-ops remove-ops move-ops update-ops remove-page-ops])) - (defn- datoms + (into {} + (keep (fn [datoms] + (when-let [e (ffirst datoms)] + [e datoms]))) + entity-datoms-coll)] + (mapv second (sort-by first < id->datoms)))) + (defn generate-rtc-ops [repo db-before db-after datoms] (let [same-entity-datoms-coll (->> datoms (map vec) (group-by first) - vals) + vals + sort-entity-datoms-coll) ops (mapcat (partial entity-datoms=>ops repo db-before db-after) same-entity-datoms-coll)] (when (seq ops) (swap! *ops-pending-to-store conj {:ops ops :repo repo})))) diff --git a/src/main/frontend/db/rtc/ops_idb_store.cljs b/src/main/frontend/db/rtc/ops_idb_store.cljs index 90fec445cc..55fc82810d 100644 --- a/src/main/frontend/db/rtc/ops_idb_store.cljs +++ b/src/main/frontend/db/rtc/ops_idb_store.cljs @@ -30,7 +30,7 @@ (defn- c (c (! push-data-to-client-chan {:req-id "push-updates"