Commit 481a3225 authored by Mael NICOLAS's avatar Mael NICOLAS

trying to understand why it doesnt display ce charts

parent 1436ec99
module Chart module Chart where
(
histogram2,
histogram
)
where
import Prelude import Prelude
...@@ -215,7 +210,7 @@ echarts :: forall eff. Array Props -> R.ReactElement ...@@ -215,7 +210,7 @@ echarts :: forall eff. Array Props -> R.ReactElement
echarts p = R.createElementDynamic eChartsClass (unsafeFromPropsArray p) [] echarts p = R.createElementDynamic eChartsClass (unsafeFromPropsArray p) []
echarts' :: forall eff. Option -> R.ReactElement echarts' :: forall eff. Option -> R.ReactElement
echarts' opt = R.createElementDynamic eChartsClass2 opt [] echarts' chart = R.createElementDynamic eChartsClass2 chart []
-- Props -- Props
......
...@@ -18,7 +18,7 @@ performAction :: forall eff props. PerformAction (dom :: DOM | eff) State props ...@@ -18,7 +18,7 @@ performAction :: forall eff props. PerformAction (dom :: DOM | eff) State props
performAction _ _ _ = pure unit performAction _ _ _ = pure unit
render :: forall props. Render State props Action render :: forall props. Render State props Action
render dispatch _ state _ = [text "Dashboard", histogram2] render dispatch _ state _ = [text "Dashboard", histogram]
layoutDashboard :: forall props eff. Spec (dom :: DOM | eff) State props Action layoutDashboard :: forall props eff. Spec (dom :: DOM | eff) State props Action
layoutDashboard = simpleSpec performAction render layoutDashboard = simpleSpec performAction render
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