Commit 5874a9d6 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FOREST] Login button.

parent 31eb5acc
...@@ -34,8 +34,9 @@ forestCpt = R.staticComponent "G.C.Forest.forest" cpt where ...@@ -34,8 +34,9 @@ forestCpt = R.staticComponent "G.C.Forest.forest" cpt where
plus :: R2.Setter Boolean -> R.Element plus :: R2.Setter Boolean -> R.Element
plus showLogin = plus showLogin =
H.button {on: {click}} H.button {on: {click}}
[ H.div { "type": "button" [ H.div { "type": ""
, className: "glyphicon glyphicon-plus" , className: "fa fa-plus-circle fa-2x"
--, className: "glyphicon glyphicon-plus"
} [H.text "Login"] ] } [H.text "Login"] ]
-- TODO same as the one in the Login Modal (same CSS) -- TODO same as the one in the Login Modal (same CSS)
-- [ H.i { className: "material-icons md-36"} [] ] -- [ H.i { className: "material-icons md-36"} [] ]
......
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