Просмотр исходного кода

fix: extract page from whiteboard edn

Tienson Qin 1 год назад
Родитель
Сommit
6167abe160

+ 1 - 1
deps/graph-parser/src/logseq/graph_parser/extract.cljc

@@ -328,7 +328,7 @@
         page-block (gp-whiteboard/migrate-page-block page-block)
         blocks (->> blocks
                     (map gp-whiteboard/migrate-shape-block)
-                    (map #(merge % (gp-whiteboard/with-whiteboard-block-props % page-name))))
+                    (map #(merge % (gp-whiteboard/with-whiteboard-block-props % [:block/uuid (:block/uuid page-block)]))))
         _ (when verbose (println "Parsing finished: " file))]
     {:pages (list page-block)
      :blocks blocks}))

+ 1 - 1
src/main/frontend/handler/import.cljs

@@ -153,7 +153,7 @@
                 (let [blocks (->> children
                                   (map (partial medley/map-keys (fn [k] (keyword "block" k))))
                                   (map gp-whiteboard/migrate-shape-block)
-                                  (map #(merge % (gp-whiteboard/with-whiteboard-block-props % page-name))))]
+                                  (map #(merge % (gp-whiteboard/with-whiteboard-block-props % [:block/uuid uuid]))))]
                   (db/transact! blocks))
                 (editor/insert-block-tree children page-format
                                           {:target-block page-block