From 33cfd6df6f028f21c33ca0dc13cad989226112a1 Mon Sep 17 00:00:00 2001 From: Eike Kettner <eike.kettner@posteo.de> Date: Tue, 16 Feb 2021 23:05:58 +0100 Subject: [PATCH] Hide Load-more button when there is no more --- modules/webapp/src/main/elm/Page/Home/View2.elm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/modules/webapp/src/main/elm/Page/Home/View2.elm b/modules/webapp/src/main/elm/Page/Home/View2.elm index cffb43f0..ee8c3bdb 100644 --- a/modules/webapp/src/main/elm/Page/Home/View2.elm +++ b/modules/webapp/src/main/elm/Page/Home/View2.elm @@ -287,18 +287,19 @@ itemCardList flags settings model = in [ Html.map ItemCardListMsg (Comp.ItemCardList.view2 itemViewCfg settings model.itemListModel) - , loadMore model + , loadMore settings model ] -loadMore : Model -> Html Msg -loadMore model = +loadMore : UiSettings -> Model -> Html Msg +loadMore settings model = let inactive = not model.moreAvailable || model.moreInProgress || model.searchInProgress in div [ class "h-40 flex flex-col items-center justify-center w-full" + , classList [ ( "hidden", resultsBelowLimit settings model ) ] ] [ B.secondaryBasicButton { label =