Commit 3feee565 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[DESIGN] Forest Tree Box

parent 72bb7463
...@@ -477,7 +477,9 @@ nodePopupCpt = R.hooksComponent "G.C.F.T.N.B.nodePopupView" cpt ...@@ -477,7 +477,9 @@ nodePopupCpt = R.hooksComponent "G.C.F.T.N.B.nodePopupView" cpt
-> R.Element -> R.Element
panelBody nodePopupState {dispatch: d, nodeType} = panelBody nodePopupState {dispatch: d, nodeType} =
H.div {className: "panel-body flex-space-between"} H.div {className: "panel-body flex-space-between"}
[ H.div {className: "flex-center"} [buttonClick {action: doc, state: nodePopupState}] [ H.p { "style": {"margin":"10px"}} []
, H.div { className: "flex-center"}
[buttonClick {action: doc, state: nodePopupState}]
, H.div {className: "flex-center"} , H.div {className: "flex-center"}
$ map (\t -> buttonClick {action: t, state: nodePopupState}) buttons $ map (\t -> buttonClick {action: t, state: nodePopupState}) buttons
] ]
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment