mirror of https://github.com/logseq/logseq
Merge branch 'master' into feat/reproducible-plugin
commit
cb9ffa1e81
|
@ -73,12 +73,13 @@
|
||||||
|
|
||||||
(defn- get-whiteboard-shape-refs-text
|
(defn- get-whiteboard-shape-refs-text
|
||||||
[text]
|
[text]
|
||||||
(when-let [tldr (get-whiteboard-tldr-from-text text)]
|
(let [tldr (get-whiteboard-tldr-from-text text)]
|
||||||
|
(when (and tldr (object? tldr))
|
||||||
(->> (gobj/get tldr "shapes")
|
(->> (gobj/get tldr "shapes")
|
||||||
(mapv (fn [shape]
|
(mapv (fn [shape]
|
||||||
(let [shape-id (gobj/get shape "id")]
|
(let [shape-id (gobj/get shape "id")]
|
||||||
(block-ref/->block-ref shape-id))))
|
(block-ref/->block-ref shape-id))))
|
||||||
(string/join "\n"))))
|
(string/join "\n")))))
|
||||||
|
|
||||||
(defn- paste-copied-blocks-or-text
|
(defn- paste-copied-blocks-or-text
|
||||||
;; todo: logseq/whiteboard-shapes is now text/html
|
;; todo: logseq/whiteboard-shapes is now text/html
|
||||||
|
|
Loading…
Reference in New Issue