mirror of https://github.com/logseq/logseq
fix: retract :block/path-ref-pages too
parent
789b932a89
commit
a265421025
|
@ -310,6 +310,7 @@
|
||||||
after-blocks)]
|
after-blocks)]
|
||||||
[after-blocks @block-and-children-content @last-child-end-pos]))
|
[after-blocks @block-and-children-content @last-child-end-pos]))
|
||||||
|
|
||||||
|
;; FIXME: children' :block/path-ref-pages
|
||||||
(defn compute-retract-refs
|
(defn compute-retract-refs
|
||||||
"Computes old references to be retracted."
|
"Computes old references to be retracted."
|
||||||
[eid {:block/keys [ref-pages ref-blocks]} old-ref-pages old-ref-blocks]
|
[eid {:block/keys [ref-pages ref-blocks]} old-ref-pages old-ref-blocks]
|
||||||
|
@ -507,7 +508,8 @@
|
||||||
[:db/retract id :block/scheduled]
|
[:db/retract id :block/scheduled]
|
||||||
[:db/retract id :block/scheduled-ast]
|
[:db/retract id :block/scheduled-ast]
|
||||||
[:db/retract id :block/marker]
|
[:db/retract id :block/marker]
|
||||||
[:db/retract id :block/repeated?]]))
|
[:db/retract id :block/repeated?]
|
||||||
|
[:db/retract id :block/path-ref-pages]]))
|
||||||
[after-blocks block-children-content new-end-pos] (rebuild-after-blocks-indent-outdent repo file block (:end-pos (:block/meta block)) end-pos indent-left?)
|
[after-blocks block-children-content new-end-pos] (rebuild-after-blocks-indent-outdent repo file block (:end-pos (:block/meta block)) end-pos indent-left?)
|
||||||
retract-refs (compute-retract-refs (:db/id e) (first blocks) ref-pages ref-blocks)
|
retract-refs (compute-retract-refs (:db/id e) (first blocks) ref-pages ref-blocks)
|
||||||
page-id (:db/id page)
|
page-id (:db/id page)
|
||||||
|
@ -698,7 +700,8 @@
|
||||||
[:db/retract id :block/scheduled]
|
[:db/retract id :block/scheduled]
|
||||||
[:db/retract id :block/scheduled-ast]
|
[:db/retract id :block/scheduled-ast]
|
||||||
[:db/retract id :block/marker]
|
[:db/retract id :block/marker]
|
||||||
[:db/retract id :block/repeated?]]))
|
[:db/retract id :block/repeated?]
|
||||||
|
[:db/retract id :block/path-ref-pages]]))
|
||||||
transact-fn (fn []
|
transact-fn (fn []
|
||||||
(repo-handler/transact-react-and-alter-file!
|
(repo-handler/transact-react-and-alter-file!
|
||||||
repo
|
repo
|
||||||
|
|
Loading…
Reference in New Issue