Update FunkHub.elm a bit

This commit is contained in:
Richard Feldman
2016-03-04 02:27:48 -08:00
parent 8c0f9167f8
commit 471168a243

View File

@@ -1,6 +1,6 @@
module FunkHub (..) where module FunkHub (..) where
import Html exposing (div, button, text) import Html exposing (..)
import Html.Events exposing (onClick) import Html.Events exposing (onClick)
import StartApp.Simple as StartApp import StartApp.Simple as StartApp
@@ -16,9 +16,7 @@ model =
view address model = view address model =
div div
[] []
[ button [ onClick address Decrement ] [ text "-" ] [ h1 [] [ text "FunkHub" ]
, div [] [ text (toString model) ]
, button [ onClick address Increment ] [ text "+" ]
] ]