From 8e3a7bf1cb83bbb6e3dcd54308eefa52a29cd679 Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 3 Jun 2016 20:27:16 +0200
Subject: Migrate to elm 0.17

---
 src/client/elm/LoggedIn/Income/Update.elm | 19 +++++++++----------
 1 file changed, 9 insertions(+), 10 deletions(-)

(limited to 'src/client/elm/LoggedIn/Income/Update.elm')

diff --git a/src/client/elm/LoggedIn/Income/Update.elm b/src/client/elm/LoggedIn/Income/Update.elm
index 4e673fa..74920f3 100644
--- a/src/client/elm/LoggedIn/Income/Update.elm
+++ b/src/client/elm/LoggedIn/Income/Update.elm
@@ -1,25 +1,24 @@
-module LoggedIn.Income.Update
+module LoggedIn.Income.Update exposing
   ( update
-  ) where
+  )
 
-import Effects exposing (Effects)
 import Form exposing (Form)
 
 import LoggedData exposing (LoggedData)
 
 import LoggedIn.Income.Model as IncomeModel
-import LoggedIn.Income.Action as IncomeAction
+import LoggedIn.Income.Msg as IncomeMsg
 
-update : LoggedData -> IncomeAction.Action -> IncomeModel.Model -> (IncomeModel.Model, Effects IncomeAction.Action)
+update : LoggedData -> IncomeMsg.Msg -> IncomeModel.Model -> (IncomeModel.Model, Cmd IncomeMsg.Msg)
 update loggedData action model =
   case action of
 
-    IncomeAction.NoOp ->
+    IncomeMsg.NoOp ->
       ( model
-      , Effects.none
+      , Cmd.none
       )
 
-    IncomeAction.AddIncomeAction formAction ->
-      ( { model | addIncome = Form.update formAction model.addIncome }
-      , Effects.none
+    IncomeMsg.AddIncomeMsg formMsg ->
+      ( { model | addIncome = Form.update formMsg model.addIncome }
+      , Cmd.none
       )
-- 
cgit v1.2.3