clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-30 00:46:23 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix: local page graph

Browse Source
This commit is contained in:
Tienson Qin
2021-05-10 23:02:32 +08:00
parent d136d44798
commit 2292ad8b6a
1 changed files with 13 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
src/main/frontend/handler/graph.cljs
View File

@@ -52,10 +52,11 @@
(defn- uuid-or-asset?
[id]
(or (util/uuid-string? id)
(string/starts-with? id "../assets/")
(= id "..")
(string/starts-with? id "assets/")))
(let [id (str id)]
(or (util/uuid-string? id)
(string/starts-with? id "../assets/")
(= id "..")
(string/starts-with? id "assets/"))))
(defn- remove-uuids-and-files!
[nodes]
@@ -70,10 +71,14 @@
(map :source links)
(map :target links)]))
(map string/lower-case))
names (db/pull-many '[:block/name :block/original-name] (mapv (fn [page] [:block/name page]) all-pages))
names (zipmap (map :block/name names)
(map (fn [x] (get x :block/original-name (:block/name x))) names))
nodes (mapv (fn [node] (assoc node :id (get names (:id node)))) nodes)
names (db/pull-many '[:block/name :block/original-name] (mapv (fn [page]
(if (util/uuid-string? page)
[:block/uuid (uuid page)]
[:block/name page])) all-pages))
names (zipmap (map (fn [x] (get x :block/name)) names)
(map (fn [x]
(get x :block/original-name (:block/name x))) names))
nodes (mapv (fn [node] (assoc node :id (get names (:id node) (:id node)))) nodes)
links (->>
(mapv (fn [{:keys [source target]}]
(when (and (not (uuid-or-asset? source))