Correcting whatever the compiler tells me is wrong.

1 files changed, 26 insertions, 0 deletions

diff --git a/elm/battlemap/src/View/Battlemap.elm b/elm/battlemap/src/View/Battlemap.elm
new file mode 100644
index 0000000..1e10a2a
--- /dev/null
+++ b/elm/battlemap/src/View/Battlemap.elm
@@ -0,0 +1,26 @@
+module View.Battlemap exposing (view)
+
+import View.Battlemap.Tile
+import View.Battlemap.Navigator
+
+view : Battlemap.Type -> (Html.Html Event.Type)
+view battlemap =
+   (Html.div
+      [
+         (Html.Attribute.class "battlemap-container")
+      ]
+      [
+         (
+         ,
+         case battlemap.navigator of
+            (Just navigator) ->
+               (Html.div
+                  [
+                     (Html.Attribute.class "battlemap-navigator-container")
+                  ]
+                  [ (Battlemap.Navigator.Html.view battlemap.navigator) ]
+               )
+
+            Nothing -> (Html.text "") -- Meaning no element.
+      ]
+   )