blob: 3a86741655d966fa2ee123e0d181eaeae569d312 (
plain)
| 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 | module View.Header exposing (get_html)
-- Elm -------------------------------------------------------------------------
import Html
import Html.Attributes
-- Battlemap -------------------------------------------------------------------
import Event
import Model
--------------------------------------------------------------------------------
-- EXPORTED --------------------------------------------------------------------
--------------------------------------------------------------------------------
get_html : Model.Type -> (Html.Html Event.Type)
get_html model =
   (Html.div
      [
         (Html.Attributes.class "battlemap-header")
      ]
      [
         (Html.text "Tacticians Online - Development Branch")
      ]
   )
 |