fix: keep copy-paste buffer intact when deleting blocks

Related to #1507
This commit is contained in:
Tienson Qin
2021-03-22 16:16:55 +08:00
parent a1f5c715d0
commit ba5259feb9
2 changed files with 8 additions and 8 deletions

View File

@@ -1219,8 +1219,8 @@
(common-handler/copy-to-clipboard-without-id-property! content)))))
(defn cut-selection-blocks
[]
(copy-selection-blocks)
[copy?]
(when copy? (copy-selection-blocks))
(when-let [blocks (seq (get-selected-blocks-with-children))]
(let [repo (dom/attr (first blocks) "repo")
ids (distinct (map #(uuid (dom/attr % "blockid")) blocks))]