diff options
Diffstat (limited to 'src/client/elm/View/LoggedIn/Monthly.elm')
| -rw-r--r-- | src/client/elm/View/LoggedIn/Monthly.elm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/client/elm/View/LoggedIn/Monthly.elm b/src/client/elm/View/LoggedIn/Monthly.elm index 2c11993..c0294d7 100644 --- a/src/client/elm/View/LoggedIn/Monthly.elm +++ b/src/client/elm/View/LoggedIn/Monthly.elm @@ -10,7 +10,7 @@ import Html.Attributes exposing (..) import Html.Events exposing (..) import Model exposing (Model) -import Model.Payment exposing (Payments, Payment) +import Model.Payment as Payment exposing (Payments, Payment) import Model.Translations exposing (getMessage, getParamMessage) import Model.Action exposing (..) import Model.Action.LoggedInAction exposing (..) @@ -81,7 +81,7 @@ paymentLine address model loggedInView payment = [ text (price model payment.cost) ] , div [ class "cell delete" - , onClick address (ServerCommunication <| Communication.DeleteMonthlyPayment payment.id) + , onClick address (ServerCommunication <| Communication.DeletePayment payment Payment.Monthly) ] [ button [] [ renderIcon "times" ] ] |