clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-21 19:24:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix: cut paste blocks

Browse Source
This commit is contained in:
Tienson Qin
2023-11-15 20:01:24 +08:00
parent 02e9f8eaa7
commit f67adcd4d5
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/main/frontend/modules/outliner/core.cljs
View File

@@ -416,13 +416,12 @@
(defn- assign-temp-id
[blocks replace-empty-target? target-block]
(map-indexed (fn [idx block]
;; TODO: block uuid changed, this could be a problem for rtc
(let [replacing-block? (and replace-empty-target? (zero? idx))
db-id (if replacing-block?
(:db/id target-block)
(dec (- idx)))]
(cond-> (assoc block :db/id db-id)
(and replacing-block? (:block/uuid target-block))
(assoc :block/uuid (:block/uuid target-block))))) blocks))
(assoc block :db/id db-id))) blocks))
(defn- find-outdented-block-prev-hop
[outdented-block blocks]