diff options
Diffstat (limited to 'src/client/View/LoggedIn')
| -rw-r--r-- | src/client/View/LoggedIn/Account.elm | 2 | ||||
| -rw-r--r-- | src/client/View/LoggedIn/Monthly.elm | 20 |
2 files changed, 8 insertions, 14 deletions
diff --git a/src/client/View/LoggedIn/Account.elm b/src/client/View/LoggedIn/Account.elm index e2b8e7e..88f39c3 100644 --- a/src/client/View/LoggedIn/Account.elm +++ b/src/client/View/LoggedIn/Account.elm @@ -39,7 +39,7 @@ account model loggedInView = exceedingPayers : Model -> LoggedInView -> Html exceedingPayers model loggedInView = button - [ class "exceedingPayers" + [ class "header" , onClick actions.address (UpdateLoggedIn << UpdateAccount <| ToggleDetail) ] ( (List.map (exceedingPayer model loggedInView) (getOrderedExceedingPayers loggedInView.account.payers)) diff --git a/src/client/View/LoggedIn/Monthly.elm b/src/client/View/LoggedIn/Monthly.elm index 518724b..9195479 100644 --- a/src/client/View/LoggedIn/Monthly.elm +++ b/src/client/View/LoggedIn/Monthly.elm @@ -42,19 +42,13 @@ monthlyCount model monthly = let count = List.length monthly.payments total = List.sum << List.map .cost <| monthly.payments key = if count > 1 then "PluralMonthlyCount" else "SingularMonthlyCount" - in if count == 0 - then - div - [ class "count" ] - [ text (getMessage "NoMonthlyPayment" model.translations) ] - else - button - [ class "count" - , onClick actions.address (UpdateLoggedIn << UpdateMonthly <| ToggleDetail) - ] - [ text (getParamMessage [toString count, price model total] key model.translations) - , expand ExpandDown monthly.visibleDetail - ] + in button + [ class "header" + , onClick actions.address (UpdateLoggedIn << UpdateMonthly <| ToggleDetail) + ] + [ text (getParamMessage [toString count, price model total] key model.translations) + , expand ExpandDown monthly.visibleDetail + ] paymentsTable : Model -> LoggedInView -> Monthly -> Html paymentsTable model loggedInView monthly = |