Skip to content

Instantly share code, notes, and snippets.

@chuck0523
Created April 13, 2016 22:27
Show Gist options
  • Save chuck0523/ca414644663180d913ca191cd2bd1acb to your computer and use it in GitHub Desktop.
Save chuck0523/ca414644663180d913ca191cd2bd1acb to your computer and use it in GitHub Desktop.
view : Signal.Address Action -> Model -> Html
view address model =
let
todos = List.map (viewTodos address) model.todos
add = button [onClick address Add ] [ text "+" ]
in
div [ todosStyle ] ([add] ++ todos)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment