| summaryrefslogtreecommitdiff | 
diff options
Diffstat (limited to 'client/elm/battlemap/src/View.elm')
| -rw-r--r-- | client/elm/battlemap/src/View.elm | 35 | 
1 files changed, 35 insertions, 0 deletions
| diff --git a/client/elm/battlemap/src/View.elm b/client/elm/battlemap/src/View.elm new file mode 100644 index 0000000..f4774c7 --- /dev/null +++ b/client/elm/battlemap/src/View.elm @@ -0,0 +1,35 @@ +module View exposing (view) + +import Html exposing (Html, button, div, text, table, tr, td) +import Html.Events exposing (onClick) + +import Update exposing (Msg(Increment, Decrement)) +import Model exposing (Model) + +import Battlemap.Html as Batmap exposing (view) + +-- VIEW + +view : Model -> (Html Msg) +view model = +   (div +      [] +      [ +         (button +            [ (onClick Decrement) ] +            [ (text "-") ] +         ), +         (div +            [] +            [ (text (toString model)) ] +         ), +         (button +            [ (onClick Increment) ] +            [ (text "+") ] +         ), +         (div +            [] +            [(Batmap.view model)] +         ) +      ] +   ) | 


