From ce4c192b5be9fa263bb08f990ca2f5ed7c27b90c Mon Sep 17 00:00:00 2001 From: eikek Date: Sat, 13 Nov 2021 23:04:00 +0100 Subject: [PATCH] Fix notification about new items Don't set the flag when already on "home page". --- modules/webapp/src/main/elm/App/Update.elm | 2 +- modules/webapp/src/main/elm/App/View2.elm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/modules/webapp/src/main/elm/App/Update.elm b/modules/webapp/src/main/elm/App/Update.elm index db44d2c7..20e51359 100644 --- a/modules/webapp/src/main/elm/App/Update.elm +++ b/modules/webapp/src/main/elm/App/Update.elm @@ -318,7 +318,7 @@ updateWithSub msg model = newModel = { model - | showNewItemsArrived = isProcessItem + | showNewItemsArrived = isProcessItem && model.page /= HomePage , jobsWaiting = max 0 (model.jobsWaiting - 1) } in diff --git a/modules/webapp/src/main/elm/App/View2.elm b/modules/webapp/src/main/elm/App/View2.elm index 6746222a..5f824270 100644 --- a/modules/webapp/src/main/elm/App/View2.elm +++ b/modules/webapp/src/main/elm/App/View2.elm @@ -75,7 +75,7 @@ topNavUser auth model = [ a [ class S.infoMessageBase , class "my-2 px-1 py-1 rounded-lg inline-block hover:opacity-50" - , classList [ ( "hidden", not model.showNewItemsArrived || model.page == HomePage ) ] + , classList [ ( "hidden", not model.showNewItemsArrived ) ] , Page.href HomePage , onClick ToggleShowNewItemsArrived ]