From 36a90770ebeb9bd99e136bfe035fdda5dfabc304 Mon Sep 17 00:00:00 2001 From: Joris Date: Sun, 19 Jun 2016 21:18:56 +0200 Subject: Add a dialog to confirm income deletion --- src/client/elm/LoggedIn/Update.elm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/client/elm/LoggedIn/Update.elm') diff --git a/src/client/elm/LoggedIn/Update.elm b/src/client/elm/LoggedIn/Update.elm index 23f242d..7133786 100644 --- a/src/client/elm/LoggedIn/Update.elm +++ b/src/client/elm/LoggedIn/Update.elm @@ -35,9 +35,9 @@ import Utils.Tuple as Tuple import Utils.Cmd exposing ((:>)) update : Model -> LoggedInMsg.Msg -> LoggedInModel.Model -> (LoggedInModel.Model, Cmd LoggedInMsg.Msg) -update model action loggedIn = +update model msg loggedIn = let loggedData = LoggedData.build model loggedIn - in case action of + in case msg of LoggedInMsg.NoOp -> (loggedIn, Cmd.none) -- cgit v1.2.3