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

enhance: validate export EDN for most export types

Browse Source 
and error explicitly if they can't import. This is much better
for the user so they aren't finding out later that EDN is invalid
on import. Added both to the export menu and to export EDN commands that
aren't graph-wide. Related to
https://github.com/logseq/db-test/issues/549
This commit is contained in:
Gabriel Horner
2025-12-02 13:50:09 -05:00
parent 748690b16d
commit 134dc0f2a8
4 changed files with 72 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

44
src/main/frontend/handler/db_based/export.cljs
View File

@@ -8,7 +8,19 @@
[frontend.util :as util]
[frontend.util.page :as page-util]
[goog.dom :as gdom]
[promesa.core :as p]))
[promesa.core :as p]
[logseq.db.sqlite.export :as sqlite-export]))
(defn- <export-edn-helper
"Gets export-edn and validates export for smaller exports. Copied from component.export/<export-edn-helper"
[export-args]
(p/let [export-edn (state/<invoke-db-worker :thread-api/export-edn (state/get-current-repo) export-args)]
(if-let [error (:error (sqlite-export/validate-export export-edn))]
(do
(js/console.log "Invalid export EDN:")
(pprint/pprint export-edn)
{:export-edn-error error})
export-edn)))
(defn ^:export export-block-data []
;; Use editor state to locate most recent block
@@ -24,27 +36,25 @@
(notification/show! "No block found" :warning)))
(defn export-view-nodes-data [rows {:keys [group-by?]}]
(p/let [result (state/<invoke-db-worker :thread-api/export-edn
(state/get-current-repo)
{:export-type :view-nodes
:rows rows
:group-by? group-by?})
(p/let [result (<export-edn-helper {:export-type :view-nodes
:rows rows
:group-by? group-by?})
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))))
(if (:export-edn-error result)
(notification/show! (:export-edn-error result) :error)
(do (.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)]
(p/let [result (state/<invoke-db-worker :thread-api/export-edn
(state/get-current-repo)
{:export-type :page :page-id page-id})
(p/let [result (<export-edn-helper {:export-type :page :page-id page-id})
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 page's data!" :success)))
(if (:export-edn-error result)
(notification/show! (:export-edn-error result) :error)
(do (.writeText js/navigator.clipboard pull-data)
(println pull-data)
(notification/show! "Copied page's data!" :success))))
(notification/show! "No page found" :warning)))
(defn ^:export export-graph-ontology-data []