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

fix: shape uuid should be persisted

Browse Source
This commit is contained in:
Peng Xiao
2022-07-21 22:57:06 +08:00
parent 87953437af
commit 8eefd44540
4 changed files with 31 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
src/main/frontend/handler/whiteboard.cljs
View File

@@ -6,6 +6,17 @@
[frontend.modules.outliner.file :as outliner-file]
[frontend.state :as state]))
;; (defn set-linked-page-or-block!
;; [page-or-block-id]
;; (when-let [app ^js (state/get-current-whiteboard)]
;; (let [shapes (:whiteboard/linked-shapes @state/state)]
;; (when (and (seq shapes) page-or-block-id)
;; (let [fs (first shapes)]
;; (.updateShapes app (clj->js
;; [{:id (.-id fs)
;; :logseqLink page-or-block-id}])))))))
;; FIXME: embed /draw should be supported too
(defn whiteboard-mode?
[]
@@ -71,7 +82,7 @@
assets (:assets page-properties)
page-properties (dissoc page-properties :assets)]
(clj->js {:currentPageId id
:assets assets
:assets (or assets #js [])
:pages [(merge page-properties
{:id id
:name "page"
@@ -89,15 +100,6 @@
tx (tldr-page->blocks-tx page-name (assoc (first pages) :assets assets))]
(db-utils/transact! tx)))
(defn set-linked-page-or-block!
[page-or-block-id]
(when-let [app ^js (state/get-current-whiteboard)]
(let [shapes (:whiteboard/linked-shapes @state/state)]
(when (and (seq shapes) page-or-block-id)
(let [fs (first shapes)]
(.updateShapes app (clj->js
[{:id (.-id fs)
:logseqLink page-or-block-id}])))))))
(defn get-default-tldr
[page-id]