Improve scrollIntoView behavior #437

nfdi4plants · Jun 20, 2024 · 7dcbc9a · 7dcbc9a
1 parent f6f2c04
commit 7dcbc9a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Client/Pages/BuildingBlock/SearchComponent.fs b/src/Client/Pages/BuildingBlock/SearchComponent.fs
@@ -108,7 +108,7 @@ let private scrollIntoViewRetry (id: string) =
                 ()
         else
             let rect = headerelement.getBoundingClientRect()
-            if rect.left >= 0 then
+            if rect.left >= 0 && ((rect.right <= Browser.Dom.window.innerWidth) || (rect.right <= Browser.Dom.document.documentElement.clientWidth)) then
                 ()
             else
                 let config = createEmpty<Browser.Types.ScrollIntoViewOptions>