clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-29 08:26:40 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merge remote-tracking branch 'upstream/master' into more-pasting-issues

Browse Source
This commit is contained in:
Peng Xiao
2022-10-18 10:38:56 +08:00
parent 907bfa2e20 5f4aa91207
commit ef6abe8802
4 changed files with 13 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
src/main/frontend/handler/paste.cljs
View File

@@ -71,12 +71,13 @@
(defn- get-whiteboard-shape-refs-text
[text]
(when-let [tldr (get-whiteboard-tldr-from-text text)]
(->> (gobj/get tldr "shapes")
(mapv (fn [shape]
(let [shape-id (gobj/get shape "id")]
(block-ref/->block-ref shape-id))))
(string/join "\n"))))
(let [tldr (get-whiteboard-tldr-from-text text)]
(when (and tldr (object? tldr))
(->> (gobj/get tldr "shapes")
(mapv (fn [shape]
(let [shape-id (gobj/get shape "id")]
(block-ref/->block-ref shape-id))))
(string/join "\n")))))
(defn- paste-copied-blocks-or-text
;; todo: logseq/whiteboard-shapes is now text/html