Migrate to elm 0.17

1 files changed, 10 insertions, 11 deletions

diff --git a/src/client/elm/View.elm b/src/client/elm/View.elm
index 90808aa..38734bc 100644
--- a/src/client/elm/View.elm
+++ b/src/client/elm/View.elm
@@ -1,12 +1,11 @@
-module View
+module View exposing
   ( view
-  ) where
+  )
 
 import Html exposing (..)
-import Signal exposing (Address)
 
 import Model exposing (Model)
-import Action exposing (Action)
+import Msg exposing (Msg)
 import Model.View exposing (..)
 import LoggedData
 
@@ -15,18 +14,18 @@ import View.Header exposing (renderHeader)
 import SignIn.View as SignInView
 import LoggedIn.View as LoggedInView
 
-view : Address Action -> Model -> Html
-view address model =
+view : Model -> Html Msg
+view model =
   div
     []
-    [ renderHeader address model
-    , renderMain address model
+    [ renderHeader model
+    , renderMain model
     ]
 
-renderMain : Address Action -> Model -> Html
-renderMain address model =
+renderMain : Model -> Html Msg
+renderMain model =
   case model.view of
     SignInView signIn ->
-      SignInView.view address model signIn
+      SignInView.view model signIn
     LoggedInView loggedIn ->
       LoggedInView.view model loggedIn