fix: lint warnings

This commit is contained in:
Tienson Qin
2022-08-13 11:52:54 +08:00
parent 21603f9d1d
commit 08ba4348b9
2 changed files with 4 additions and 5 deletions

View File

@@ -236,8 +236,7 @@
"Get affected queries through transaction datoms."
[{:keys [tx-data db-before db-after]}]
{:post [(s/valid? ::affected-keys %)]}
(let [repo (state/get-current-repo)
blocks (->> (filter (fn [datom] (contains? #{:block/left :block/parent :block/page} (:a datom))) tx-data)
(let [blocks (->> (filter (fn [datom] (contains? #{:block/left :block/parent :block/page} (:a datom))) tx-data)
(map :v)
(distinct))
refs (->> (filter (fn [datom] (contains? #{:block/refs :block/path-refs} (:a datom))) tx-data)