greatbody
/
logseq
mirror of https://github.com/logseq/logseq
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

fix: roam export

pull/7641/head
Tienson Qin 2022-12-08 21:15:47 +08:00
parent 7a5310eb5d
commit 4708e6067d
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/main/frontend/external/roam_export.cljs vendored
View File

@ -33,14 +33,15 @@
(into {}))))
(defn update-content [content uuid->uid-map]
(let [uuids (keys uuid->uid-map)]
(reduce
(fn [acc uuid]
(if (str/includes? acc (str uuid))
(str/replace acc (str uuid) (get uuid->uid-map uuid))
acc))
content
uuids)))
(when content ; page block doesn't have content
(let [uuids (keys uuid->uid-map)]
(reduce
(fn [acc uuid]
(if (str/includes? acc (str uuid))
(str/replace acc (str uuid) (get uuid->uid-map uuid))
acc))
content
uuids))))
(defn update-uid [{:block/keys [uuid content] :as b}
uuid->uid-map]