From 6541fa5316816d6f97a87a370775cfe278e7eeb8 Mon Sep 17 00:00:00 2001 From: Joris Date: Thu, 7 Apr 2016 23:58:23 +0200 Subject: Add cumulative incomes by user --- src/client/elm/LoggedIn/Stat/View.elm | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'src/client/elm/LoggedIn/Stat/View.elm') diff --git a/src/client/elm/LoggedIn/Stat/View.elm b/src/client/elm/LoggedIn/Stat/View.elm index f4bc56c..6661a75 100644 --- a/src/client/elm/LoggedIn/Stat/View.elm +++ b/src/client/elm/LoggedIn/Stat/View.elm @@ -41,8 +41,22 @@ paymentsDetail loggedData payments = , li [] [ text (paymentsSum loggedData.conf payments) ] + , li + [] + [ text "Par utilisateur:" + , totalPayments loggedData + ] + ] + +totalPayments : LoggedData -> Html +totalPayments loggedData = + ul + [] + [ li [] [ text "Jacques: 1 300€" ] + , li [] [ text "Anne: 2 500 €" ] ] + monthsDetail : LoggedData -> Html monthsDetail loggedData = ul -- cgit v1.2.3