@@ -94,7 +94,7 @@
;; block path refs
(when (seq blocks')
(let [db-after (or (:db-after refs-tx-report) (:db-after tx-report))
- blocks' (map (fn [b] (or (d/entity db-after (:db/id b)) b)) blocks)]
+ blocks' (map (fn [b] (or (d/entity db-after (:db/id b)) b)) blocks')]
(set (compute-block-path-refs-tx tx-report blocks'))))
;; update block/tx-id