A library to assemble examples or develop components separately.
First define the stories. Each story consists of a name and a component.
import Halogen.Storybook (Stories, runStorybook, proxy)
stories :: forall m. Stories m
stories = SM.fromFoldable
[ Tuple "count" $ proxy $ ExpCount.component
, Tuple "input" $ proxy $ ExpInput.component
]
Then add a runStorybook
line to your main function. That's it.
main = HA.runHalogenAff do
body <- HA.awaitBody
runStorybook stories body