fix(export): export-edn on table-view

This commit is contained in:
rcmerci
2025-04-08 15:40:37 +08:00
parent 8f13520e5a
commit cce15d2c42
3 changed files with 11 additions and 12 deletions

View File

@@ -23,16 +23,15 @@
(notification/show! "Copied block's data!" :success)))
(notification/show! "No block found" :warning)))
(defn export-view-nodes-data [nodes]
(let [block-uuids (mapv #(vector :block/uuid (:block/uuid %)) nodes)]
(p/let [result (state/<invoke-db-worker :thread-api/export-edn
(state/get-current-repo)
{:export-type :view-nodes :node-ids block-uuids})
pull-data (with-out-str (pprint/pprint result))]
(when-not (= :export-edn-error result)
(.writeText js/navigator.clipboard pull-data)
(println pull-data)
(notification/show! "Copied view nodes' data!" :success)))))
(defn export-view-nodes-data [node-ids]
(p/let [result (state/<invoke-db-worker :thread-api/export-edn
(state/get-current-repo)
{:export-type :view-nodes :node-ids node-ids})
pull-data (with-out-str (pprint/pprint result))]
(when-not (= :export-edn-error result)
(.writeText js/navigator.clipboard pull-data)
(println pull-data)
(notification/show! "Copied view nodes' data!" :success))))
(defn ^:export export-page-data []
(if-let [page-id (page-util/get-current-page-id)]