diff --git a/src/main/frontend/worker/rtc/core.cljs b/src/main/frontend/worker/rtc/core.cljs
index 864111d0b..6c464eeb7 100644
--- a/src/main/frontend/worker/rtc/core.cljs
+++ b/src/main/frontend/worker/rtc/core.cljs
@@ -346,20 +346,22 @@
   (let [ent (d/entity @conn [:block/uuid block-uuid])]
     (worker-util/profile
      ::need-update-block?
-     (some (fn [[k v]]
-             (case k
-               :content     (not= v (:block/raw-content ent))
-               :updated-at  (not= v (:block/updated-at ent))
-               :created-at  (not= v (:block/created-at ent))
-               :alias       (not= (set v) (set (map :block/uuid (:block/alias ent))))
-               :type        (not= (set v) (set (:block/type ent)))
-               :schema      (not= (transit/read transit-r v) (:block/schema ent))
-               :tags        (not= (set v) (set (map :block/uuid (:block/tags ent))))
-               :properties  (not= (transit/read transit-r v) (:block/properties ent))
-               :link        (not= v (:block/uuid (:block/link ent)))
-               :journal-day (not= v (:block/journal-day ent))
-               false))
-           op-value))))
+     (let [r (some (fn [[k v]]
+                     (case k
+                       :content     (not= v (:block/raw-content ent))
+                       :updated-at  (not= v (:block/updated-at ent))
+                       :created-at  (not= v (:block/created-at ent))
+                       :alias       (not= (set v) (set (map :block/uuid (:block/alias ent))))
+                       :type        (not= (set v) (set (:block/type ent)))
+                       :schema      (not= (transit/read transit-r v) (:block/schema ent))
+                       :tags        (not= (set v) (set (map :block/uuid (:block/tags ent))))
+                       :properties  (not= (transit/read transit-r v) (:block/properties ent))
+                       :link        (not= v (:block/uuid (:block/link ent)))
+                       :journal-day (not= v (:block/journal-day ent))
+                       false))
+                   op-value)]
+       (prn :need-update-block? r)
+       r))))
 
 (defn- update-block-attrs
   [repo conn date-formatter block-uuid {:keys [parents properties _content] :as op-value}]