clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-01 01:16:27 +00:00
Code Issues Packages Projects Releases Wiki Activity

feat: grouping & ungrouping shapes (#7713)

Browse Source 
Grouping && ungrouping shapes support
This commit is contained in:
Peng Xiao
2022-12-15 22:58:18 +08:00
committed by GitHub
parent 5ee8707469
commit 1141890a8c
23 changed files with 405 additions and 110 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -72,16 +72,6 @@
(gp-util/safe-decode-uri-component text))]
(try-parse-as-json (second matched-text))))
(defn- get-whiteboard-shape-refs-text
[text]
(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
[text e html]
@@ -90,7 +80,10 @@
input (state/get-input)
input-id (state/get-edit-input-id)
text (string/replace text "\r\n" "\n") ;; Fix for Windows platform
shape-refs-text (when-not (string/blank? html) (get-whiteboard-shape-refs-text html))
shape-refs-text (when (and (not (string/blank? html))
(get-whiteboard-tldr-from-text html))
;; text should alway be prepared block-ref generated in tldr
text)
internal-paste? (and
(seq (:copy/blocks copied-blocks))
;; not copied from the external clipboard