From a8309988518af5bddf62d6a326d990fde4069b40 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 3 Jan 2016 19:41:31 +0100
Subject: Set focus properties to button elements

---
 src/client/elm/View/LoggedIn/Monthly.elm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

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

diff --git a/src/client/elm/View/LoggedIn/Monthly.elm b/src/client/elm/View/LoggedIn/Monthly.elm
index c0294d7..2e9ff1e 100644
--- a/src/client/elm/View/LoggedIn/Monthly.elm
+++ b/src/client/elm/View/LoggedIn/Monthly.elm
@@ -13,9 +13,8 @@ import Model exposing (Model)
 import Model.Payment as Payment exposing (Payments, Payment)
 import Model.Translations exposing (getMessage, getParamMessage)
 import Model.Action exposing (..)
-import Model.Action.LoggedInAction exposing (..)
+import Model.Action.LoggedInAction as LoggedInAction exposing (..)
 import Model.Action.MonthlyAction exposing (..)
-import Model.Communication as Communication
 import Model.View.LoggedIn.Monthly exposing (Monthly)
 import Model.View.LoggedInView exposing (LoggedInView)
 
@@ -81,7 +80,7 @@ paymentLine address model loggedInView payment =
         [ text (price model payment.cost) ]
     , div
         [ class "cell delete"
-        , onClick address (ServerCommunication <| Communication.DeletePayment payment Payment.Monthly)
+        , onClick address (UpdateLoggedIn <| LoggedInAction.DeletePayment payment Payment.Monthly)
         ]
         [ button [] [ renderIcon "times" ]
         ]
-- 
cgit v1.2.3