From 4ce4de89a5400b0d8b9cddaa2922901a081fdaaa Mon Sep 17 00:00:00 2001
From: Joris
Date: Thu, 23 Jun 2016 23:43:23 +0200
Subject: Use a dialog to add a payment

---
 src/client/elm/LoggedIn/Income/View.elm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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

diff --git a/src/client/elm/LoggedIn/Income/View.elm b/src/client/elm/LoggedIn/Income/View.elm
index 7970284..25cb5a6 100644
--- a/src/client/elm/LoggedIn/Income/View.elm
+++ b/src/client/elm/LoggedIn/Income/View.elm
@@ -6,6 +6,7 @@ import Dict
 import Date
 import Time exposing (Time)
 import Color
+import Task
 
 import FontAwesome
 
@@ -114,7 +115,7 @@ incomeView loggedData (incomeId, income) =
             { title = getMessage "ConfirmDelete" loggedData.translations
             , body = always <| text ""
             , confirm = getMessage "Confirm" loggedData.translations
-            , confirmMsg = Msg.UpdateLoggedIn <| LoggedInMsg.DeleteIncome incomeId
+            , confirmMsg = always <| Ok <| Msg.UpdateLoggedIn <| LoggedInMsg.DeleteIncome incomeId
             , undo = getMessage "Undo" loggedData.translations
             }
       in  button
-- 
cgit v1.2.3