clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-25 06:35:02 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix: can't paste asset

Browse Source 
fixes https://github.com/logseq/db-test/issues/575
This commit is contained in:
Tienson Qin
2025-11-10 08:32:05 +08:00
parent 820b2f075d
commit 2140029c60
3 changed files with 18 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
deps/outliner/src/logseq/outliner/core.cljs vendored
View File

@@ -795,7 +795,7 @@
:or {update-timestamps? true}}]
{:pre [(seq blocks)
(m/validate block-map-or-entity target-block)]}
(let [blocks (->>
(let [blocks (cond->>
(keep (fn [b]
(if-let [eid (or (:db/id b)
(when-let [id (:block/uuid b)]
@@ -813,7 +813,9 @@
(apply dissoc b' dissoc-keys))
b))
blocks)
(remove ldb/asset?))
(or (= outliner-op :paste)
insert-template?)
(remove ldb/asset?))
[target-block sibling?] (get-target-block db blocks target-block opts)
_ (assert (some? target-block) (str "Invalid target: " target-block))
replace-empty-target? (if (and (some? replace-empty-target?)
@@ -1161,7 +1163,10 @@
(insert-blocks repo @conn blocks target-block opts))]
(defn insert-blocks!
[repo conn blocks target-block opts]
(op-transact! :insert-blocks f repo conn blocks target-block (assoc opts :outliner-op :insert-blocks))))
(op-transact! :insert-blocks f repo conn blocks target-block
(if (:outliner-op opts)
opts
(assoc opts :outliner-op :insert-blocks)))))
(let [f (fn [_repo conn blocks _opts]
(delete-blocks @conn blocks))]
@@ -1172,7 +1177,9 @@
(defn move-blocks!
[repo conn blocks target-block opts]
(op-transact! :move-blocks move-blocks repo conn blocks target-block
(assoc opts :outliner-op :move-blocks)))
(if (:outliner-op opts)
opts
(assoc opts :outliner-op :move-blocks))))
(defn move-blocks-up-down!
[repo conn blocks up?]