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

Merge branch 'master' into feat/outliner-core

Browse Source
This commit is contained in:
Tienson Qin
2021-04-05 09:53:18 +08:00
parent 3f67719f76 b718d4f50a
commit f2077701ab
48 changed files with 1151 additions and 880 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -4,7 +4,8 @@
[frontend.util :as util]
[frontend.date :as date]
[frontend.state :as state]
[clojure.set :as set]))
[clojure.set :as set]
[medley.core :as medley]))
(defn- build-edges
[edges]
@@ -27,17 +28,21 @@
(->>
(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")
(let [p (str p)
current-page? (= p current-page)
block? (and p (util/uuid-string? p))
color (if block?
"#1a6376"
(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
:name name
:val (get-connections p edges)
:autoColorBy "group"
:group (js/Math.ceil (* (js/Math.random) 12))