diff options
Diffstat (limited to 'src/client/elm/LoggedIn/Home/View')
| -rw-r--r-- | src/client/elm/LoggedIn/Home/View/Paging.elm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/client/elm/LoggedIn/Home/View/Paging.elm b/src/client/elm/LoggedIn/Home/View/Paging.elm index 31aa032..9942aa8 100644 --- a/src/client/elm/LoggedIn/Home/View/Paging.elm +++ b/src/client/elm/LoggedIn/Home/View/Paging.elm @@ -23,7 +23,7 @@ showedPages = 5 paymentsPaging : Address Action -> HomeModel.Model -> Html paymentsPaging address homeModel = - let maxPage = ceiling (toFloat homeModel.paymentsCount / toFloat perPage) + let maxPage = ceiling (toFloat (List.length homeModel.payments) / toFloat perPage) pages = truncatePages homeModel.currentPage [1..maxPage] in if maxPage == 1 then |