diff options
author | Joris | 2016-01-03 19:41:31 +0100 |
---|---|---|
committer | Joris | 2016-01-03 19:41:31 +0100 |
commit | a8309988518af5bddf62d6a326d990fde4069b40 (patch) | |
tree | 6ff9c0af27d78f8579b5c3975378a3c82899593c /src/client/elm/View/LoggedIn/Monthly.elm | |
parent | 0cba27cba2b44756389d50bc113f23a2be87e978 (diff) |
Set focus properties to button elements
Diffstat (limited to 'src/client/elm/View/LoggedIn/Monthly.elm')
-rw-r--r-- | src/client/elm/View/LoggedIn/Monthly.elm | 5 |
1 files changed, 2 insertions, 3 deletions
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" ] ] |