enhance: add :logseq.kv data to graph export

Addresses
https://github.com/logseq/logseq/pull/11784#pullrequestreview-2697690952.
Also improves :set option and removes outdated code in a test
This commit is contained in:
Gabriel Horner
2025-03-19 15:41:12 -04:00
parent dc02a292a9
commit f99a89f9b3
4 changed files with 52 additions and 21 deletions

View File

@@ -54,11 +54,15 @@
(-> m
(update :classes update-vals (fn [m]
(update m :build/class-properties sort)))
(update ::sqlite-export/kv-values
(fn [kvs]
;; Ignore extra metadata that a copied graph can add
(vec (remove #(#{:logseq.kv/import-type :logseq.kv/imported-at} (:db/ident %)) kvs))))
;; TODO: fix built-in views for schema export
(update :pages-and-blocks (fn [pbs]
(vec (remove #(= (:block/title (:page %)) common-config/views-page-name) pbs)))))
(:set-diff options)
(update :pages-and-blocks set)))
(update-vals set)))
diff (->> (data/diff (prepare-export-to-diff export-map) (prepare-export-to-diff export-map2))
butlast)]
(if (= diff [nil nil])