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

fix: page graph for block

Browse Source
This commit is contained in:
Tienson Qin
2021-02-24 13:00:46 +08:00
parent 19e062f35c
commit b907255d86
1 changed files with 20 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -24,23 +24,26 @@
[dark? current-page edges tags nodes]
(let [pages (->> (set (flatten nodes))
(remove nil?))]
(mapv (fn [p]
(let [current-page? (= p current-page)
color (case [dark? current-page?] ; FIXME: Put it into CSS
[false false] "#222222"
[false true] "#045591"
[true false] "#8abbbb"
[true true] "#ffffff")
color (if (contains? tags (string/lower-case p))
(if dark? "orange" "green")
color)]
{:id p
:name p
:val (get-connections p edges)
:autoColorBy "group"
:group (js/Math.ceil (* (js/Math.random) 12))
:color color}))
pages)))
(->>
(mapv (fn [p]
(when p
(let [current-page? (= p current-page)
color (case [dark? current-page?] ; FIXME: Put it into CSS
[false false] "#222222"
[false true] "#045591"
[true false] "#8abbbb"
[true true] "#ffffff")
color (if (contains? tags (string/lower-case (str p)))
(if dark? "orange" "green")
color)]
{:id p
:name p
:val (get-connections p edges)
:autoColorBy "group"
:group (js/Math.ceil (* (js/Math.random) 12))
:color color})))
pages)
(remove nil?))))
(defn- normalize-page-name
[{:keys [nodes links] :as g}]