From 984356c796963bcba44dcbe261e460bd37385c35 Mon Sep 17 00:00:00 2001 From: Joris Date: Wed, 9 Sep 2015 21:35:29 +0200 Subject: Authorizing refunds (negative payments) but stop authorizing null payments --- src/client/View/LoggedIn/Monthly.elm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'src/client/View/LoggedIn/Monthly.elm') diff --git a/src/client/View/LoggedIn/Monthly.elm b/src/client/View/LoggedIn/Monthly.elm index 5d7260e..17c354a 100644 --- a/src/client/View/LoggedIn/Monthly.elm +++ b/src/client/View/LoggedIn/Monthly.elm @@ -68,8 +68,10 @@ paymentLine model loggedInView payment = [ class ("row" ++ (if loggedInView.paymentEdition == Just payment.id then " edition" else "")) , onClick actions.address (UpdateLoggedIn (ToggleEdit payment.id)) ] - [ div [ class "cell" ] [ text (payment.name) ] - , div [ class "cell" ] [ text (toString payment.cost ++ " " ++ getMessage "MoneySymbol" model.translations) ] + [ div [ class "cell category" ] [ text (payment.name) ] + , div + [ class ("cell cost" ++ if payment.cost < 0 then " refund" else "") ] + [ text (toString payment.cost ++ " " ++ getMessage "MoneySymbol" model.translations) ] , div [ class "cell delete" , onClick serverCommunications.address (SC.DeleteMonthlyPayment payment.id) -- cgit v1.2.3