-
Notifications
You must be signed in to change notification settings - Fork 7
/
view.cljs
31 lines (26 loc) · 877 Bytes
/
view.cljs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
(ns fractalify.main.view
(:require [re-frame.core :as f]
[fractalify.router :as t]
[fractalify.main.components.header :as header]
[fractalify.main.components.sidenav :as sidenav]
[fractalify.components.snackbar :as snackbar]
[fractalify.main.components.footer :as footer]
[fractalify.components.dialog :as dialog]
[material-ui.core :as ui]
[fractalify.styles :as y]))
(defn main-layout []
(let [active-panel (f/subscribe [:active-panel])]
(fn []
[ui/app-canvas
[header/header]
[sidenav/sidenav]
[snackbar/snackbar]
[dialog/dialog]
[:div {:style y/main-body}
(t/panels @active-panel)]
[footer/footer]])))
(defn main-view []
(ui/set-palette!
{:canvasColor "#F2F2F2"})
[ui/mui-theme-wrap
[main-layout]])