fix: delete blocks && jump to next block in linked references

This commit is contained in:
Tienson Qin
2021-05-17 13:34:35 +08:00
parent 324ab6b170
commit aaa839a99b
6 changed files with 23 additions and 56 deletions

View File

@@ -225,8 +225,7 @@
(when-let [page-id (:db/id (:block/page block))]
[[:blocks (:block/uuid block)]
[:page/blocks page-id]
[:page/ref-pages page-id]
[:block/immediate-children (:db/id (:block/parent block))]]))
[:page/ref-pages page-id]]))
blocks)
(when pre-block?
@@ -290,6 +289,7 @@
[repo-url {:keys [key data] :as handler-opts}]
(let [related-keys (get-related-keys handler-opts)
db (conn/get-conn repo-url)]
(util/pprint related-keys)
(doseq [related-key related-keys]
(let [related-key (vec (cons repo-url related-key))]
(when-let [cache (get @query-state related-key)]